Mercurial > urweb
comparison src/core.sml @ 185:19ee24bffbc0
FFI datatypes
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 03 Aug 2008 17:57:47 -0400 |
parents | d11754ffe252 |
children | 88d46972de53 |
comparison
equal
deleted
inserted
replaced
184:98c29e3986d3 | 185:19ee24bffbc0 |
---|---|
59 | 59 |
60 withtype con = con' located | 60 withtype con = con' located |
61 | 61 |
62 datatype patCon = | 62 datatype patCon = |
63 PConVar of int | 63 PConVar of int |
64 | PConFfi of string * string | 64 | PConFfi of {mod : string, datatyp : string, con : string} |
65 | 65 |
66 datatype pat' = | 66 datatype pat' = |
67 PWild | 67 PWild |
68 | PVar of string * con | 68 | PVar of string * con |
69 | PPrim of Prim.t | 69 | PPrim of Prim.t |
74 | 74 |
75 datatype exp' = | 75 datatype exp' = |
76 EPrim of Prim.t | 76 EPrim of Prim.t |
77 | ERel of int | 77 | ERel of int |
78 | ENamed of int | 78 | ENamed of int |
79 | ECon of int * exp option | 79 | ECon of patCon * exp option |
80 | EFfi of string * string | 80 | EFfi of string * string |
81 | EFfiApp of string * string * exp list | 81 | EFfiApp of string * string * exp list |
82 | EApp of exp * exp | 82 | EApp of exp * exp |
83 | EAbs of string * con * con * exp | 83 | EAbs of string * con * con * exp |
84 | ECApp of exp * con | 84 | ECApp of exp * con |