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

SCM Repository

[diderot] Diff of /branches/pure-cfg/src/compiler/IL/check-il-fn.sml
ViewVC logotype

Diff of /branches/pure-cfg/src/compiler/IL/check-il-fn.sml

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

revision 1524, Mon Oct 10 18:29:43 2011 UTC revision 1525, Thu Oct 13 15:57:40 2011 UTC
# Line 270  Line 270 
270  (*DEBUG*)handle ex => raise ex;  (*DEBUG*)handle ex => raise ex;
271                    List.app checkMethod methods                    List.app checkMethod methods
272                  end                  end
273            (* handle exceptions *)
274              fun onExn exn = errFn [S "uncaught exception: ", S(exnMessage exn)]
275            in            in
276            (* check the global part *)            (* check the global part *)
277              checkCFG ([], globalInit)              checkCFG ([], globalInit) handle ex => onExn ex;
 (*DEBUG*)handle ex => raise ex;  
278  (* FIXME: need to check initially *)  (* FIXME: need to check initially *)
279            (* check the strands *)            (* check the strands *)
280              List.app checkStrand strands;              (List.app checkStrand strands) handle ex => onExn ex;
281            (* check for errors *)            (* check for errors *)
282              final()              final()
283            end            end

Legend:
Removed from v.1524  
changed lines
  Added in v.1525

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