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/parse/parse.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/parse/parse.sml

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

revision 458, Thu Oct 28 14:22:55 1999 UTC revision 459, Fri Oct 29 06:22:25 1999 UTC
# Line 320  Line 320 
320                      SafeIO.perform { openIt = openIt,                      SafeIO.perform { openIt = openIt,
321                                       closeIt = TextIO.closeIn,                                       closeIt = TextIO.closeIn,
322                                       work = work,                                       work = work,
323                                       cleanup = fn () => () }                                       cleanup = fn _ => () }
324              in              in
325                  case pro of                  case pro of
326                      NONE => NONE                      NONE => NONE

Legend:
Removed from v.458  
changed lines
  Added in v.459

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