diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-12-15 10:19:05 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-12-15 10:19:05 -0500 |
| commit | 6179a09d47c5af4db1ac41d00b8cb7ec36741c3e (patch) | |
| tree | 0912963011416a0f1132c07d44c3eca8b6545d54 /src/cjr.sml | |
| parent | 1589307fcb887ec55b5baea7445747b479a665d2 (diff) | |
Convert to task syntax
Diffstat (limited to 'src/cjr.sml')
| -rw-r--r-- | src/cjr.sml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/cjr.sml b/src/cjr.sml index 9be54670..f5392d49 100644 --- a/src/cjr.sml +++ b/src/cjr.sml @@ -100,6 +100,8 @@ datatype exp' = withtype exp = exp' located +datatype task = Initialize + datatype decl' = DStruct of int * (string * typ) list | DDatatype of (datatype_kind * string * int * (string * int * typ option) list) list @@ -118,7 +120,7 @@ datatype decl' = | DCookie of string | DStyle of string - | DInitializer of exp + | DTask of task * exp withtype decl = decl' located |