summaryrefslogtreecommitdiff
path: root/src/flat.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-06-22 10:17:34 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-06-22 10:17:34 -0400
commitd60f854fc35ce30fb698f3d8e87b88938001fdaf (patch)
tree993aecf3c64b1e472749ccc4cc3d9ffa6dd2ed3e /src/flat.sml
parentf3ddf9922b90bdd45ca5b1c33c72ff316d5440eb (diff)
FFI through cloconv
Diffstat (limited to 'src/flat.sml')
-rw-r--r--src/flat.sml3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/flat.sml b/src/flat.sml
index 55c7397a..e635bd1c 100644
--- a/src/flat.sml
+++ b/src/flat.sml
@@ -35,6 +35,7 @@ datatype typ' =
| TCode of typ * typ
| TRecord of (string * typ) list
| TNamed of int
+ | TFfi of string * string
withtype typ = typ' located
@@ -42,6 +43,8 @@ datatype exp' =
EPrim of Prim.t
| ERel of int
| ENamed of int
+ | EFfi of string * string
+ | EFfiApp of string * string * exp list
| ECode of int
| EApp of exp * exp