diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-04-16 14:49:25 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-04-16 14:49:25 -0400 |
| commit | 03deca916331e44c37a0ba46d4bbae6a12b54385 (patch) | |
| tree | 1560f6013ce6de0388180550168c20e9756eaa2c /src/core.sml | |
| parent | 59809464cf40942ec6d1787eeb5d3080e2b074f9 (diff) | |
Label exported symbols by effect-ness; factor out some common datatypes
Diffstat (limited to 'src/core.sml')
| -rw-r--r-- | src/core.sml | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/src/core.sml b/src/core.sml index d9d7f51d..01cf4ec7 100644 --- a/src/core.sml +++ b/src/core.sml @@ -70,7 +70,7 @@ datatype con' = withtype con = con' located -datatype datatype_kind = datatype Elab.datatype_kind +datatype datatype_kind = datatype DatatypeKind.datatype_kind datatype patCon = PConVar of int @@ -119,10 +119,8 @@ datatype exp' = withtype exp = exp' located -datatype export_kind = - Link - | Action - | Rpc +datatype effect = datatype Export.effect +datatype export_kind = datatype Export.export_kind datatype decl' = DCon of string * int * kind * con |