diff options
author | Adam Chlipala <adamc@hcoop.net> | 2009-10-25 15:29:21 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2009-10-25 15:29:21 -0400 |
commit | 2385b6b946eb1215d75a3dddccb05aaf8f605ba3 (patch) | |
tree | e7763596f996cbc602dfbefff837b20da643bbba /src/cjrize.sml | |
parent | 5a88b41a6655f601c989ae94ce1fc8bb391ca630 (diff) |
Use call/cc for recv and sleep
Diffstat (limited to 'src/cjrize.sml')
-rw-r--r-- | src/cjrize.sml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/cjrize.sml b/src/cjrize.sml index bf814266..c7bf7c9d 100644 --- a/src/cjrize.sml +++ b/src/cjrize.sml @@ -479,6 +479,7 @@ fun cifyExp (eAll as (e, loc), sm) = | L.EServerCall _ => raise Fail "Cjrize EServerCall" | L.ERecv _ => raise Fail "Cjrize ERecv" | L.ESleep _ => raise Fail "Cjrize ESleep" + | L.ESpawn _ => raise Fail "Cjrize ESpawn" fun cifyDecl ((d, loc), sm) = case d of |