diff options
author | 2009-12-15 10:19:05 -0500 | |
---|---|---|
committer | 2009-12-15 10:19:05 -0500 | |
commit | e6dcaec66b01e85d4972344b8eea3d7c718a949f (patch) | |
tree | 0912963011416a0f1132c07d44c3eca8b6545d54 /src/cjr.sml | |
parent | ffb02010f3f25bcdecab88b8f6cab635b649f56e (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 |