Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /trunk/src/compiler/simplify/eval.sml
ViewVC logotype

Diff of /trunk/src/compiler/simplify/eval.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1301, Thu Jun 9 23:58:40 2011 UTC revision 1640, Wed Nov 16 02:19:51 2011 UTC
# Line 295  Line 295 
295                          | S.S_New _ => raise Fail "unexpected new strand"                          | S.S_New _ => raise Fail "unexpected new strand"
296                          | S.S_Die => raise Fail "unexpected die"                          | S.S_Die => raise Fail "unexpected die"
297                          | S.S_Stabilize => raise Fail "unexpected stabilize"                          | S.S_Stabilize => raise Fail "unexpected stabilize"
298                            | S.S_Print _ => raise Fail "unexpected print"
299                        (* end case *))                        (* end case *))
300                  in                  in
301                    (List.foldl evalStm env stms) handle Done env => env                    (List.foldl evalStm env stms) handle Done env => env

Legend:
Removed from v.1301  
changed lines
  Added in v.1640

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0