diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2014-05-02 19:19:09 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2014-05-02 19:19:09 -0400 |
| commit | 0c83e8f7c345a27be3cae77eeb2d7cb8658e5e9c (patch) | |
| tree | bdccc17f7ec57e17465ac689d0f02d7b8c219a8b /src/source.sml | |
| parent | 77b4d9b9397aefc41ae0c6465a75874c497d945c (diff) | |
New lessSafeFfi
Diffstat (limited to 'src/source.sml')
| -rw-r--r-- | src/source.sml | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/source.sml b/src/source.sml index eea7ad4c..2a741dd9 100644 --- a/src/source.sml +++ b/src/source.sml @@ -147,6 +147,13 @@ and pat = pat' located and exp = exp' located and edecl = edecl' located +datatype ffi_mode = + Effectful + | BenignEffectful + | ClientOnly + | ServerOnly + | JsFunc of string + datatype decl' = DCon of string * kind option * con | DDatatype of (string * string list * (string * con option) list) list @@ -169,6 +176,7 @@ datatype decl' = | DTask of exp * exp | DPolicy of exp | DOnError of string * string list * string + | DFfi of string * ffi_mode list * con and str' = StrConst of decl list |