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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/driver/main.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/driver/main.sml

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

revision 2869, Thu Feb 12 16:14:22 2015 UTC revision 2870, Wed Feb 25 21:47:43 2015 UTC
# Line 26  Line 26 
26    
27      fun quitWithError srcFile = raise ERROR      fun quitWithError srcFile = raise ERROR
28    
29      val testing=0      val testing=1
30      fun testp e=(case testing      fun testp e=(case testing
31          of 0=>1          of 0=>1
32          | _=> ( print(String.concat ["\n\t\t------------",e,"-----------\n"]);1))          | _=> ( print(String.concat ["\n\t\t------------",e,"-----------\n"]);1))

Legend:
Removed from v.2869  
changed lines
  Added in v.2870

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