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

Diff of /sml/trunk/src/cm/smlfile/smlinfo.sml

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

revision 491, Thu Nov 25 15:08:04 1999 UTC revision 492, Fri Nov 26 09:00:50 1999 UTC
# Line 239  Line 239 
239                              else Say.vsay ["[parsing ",                              else Say.vsay ["[parsing ",
240                                             SrcPath.descr sourcepath, "]\n"]                                             SrcPath.descr sourcepath, "]\n"]
241                      val source =                      val source =
242                          Source.newSource (SrcPath.osstring sourcepath,                          Source.newSource (SrcPath.osstring' sourcepath,
243                                            1, stream, false, #errcons gp)                                            1, stream, false, #errcons gp)
244                  in                  in
245                      (SF.parse source, source)                      (SF.parse source, source)

Legend:
Removed from v.491  
changed lines
  Added in v.492

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