Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/cm/bootstrap/btcompile.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/bootstrap/btcompile.sml

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

revision 677, Mon Jun 26 00:56:56 2000 UTC revision 692, Thu Jul 27 08:34:53 2000 UTC
# Line 168  Line 168 
168    
169          val groupreg = GroupReg.new ()          val groupreg = GroupReg.new ()
170          val errcons = EM.defaultConsumer ()          val errcons = EM.defaultConsumer ()
171          val ginfo = { param = param, groupreg = groupreg, errcons = errcons }          val ginfo = { param = param, groupreg = groupreg,
172                          errcons = errcons,
173                          youngest = ref TStamp.ancient }
174    
175          fun mk_main_compile arg = let          fun mk_main_compile arg = let
176    

Legend:
Removed from v.677  
changed lines
  Added in v.692

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