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

SCM Repository

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

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

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

revision 4256, Mon Jul 25 14:49:22 2016 UTC revision 4257, Mon Jul 25 15:23:32 2016 UTC
# Line 28  Line 28 
28    
29      fun quitWithError srcFile = raise ERROR      fun quitWithError srcFile = raise ERROR
30    
31      val testing = 0      val testing = 1
32      fun testp e = (case testing      fun testp e = (case testing
33          of 0 => ()          of 0 => ()
34          | _=> print(String.concat ["\n\t\t------------",e,"-----------\n"]))          | _=> print(String.concat ["\n\t\t------------",e,"-----------\n"]))

Legend:
Removed from v.4256  
changed lines
  Added in v.4257

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