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 432, Fri Sep 10 05:44:08 1999 UTC revision 433, Mon Sep 13 06:57:29 1999 UTC
# Line 152  Line 152 
152                      fun error r m =                      fun error r m =
153                          EM.error source r EM.COMPLAIN m EM.nullErrorBody                          EM.error source r EM.COMPLAIN m EM.nullErrorBody
154                      fun obsolete r =                      fun obsolete r =
155                          if EnvConfig.getSet StdConfig.warn_obsolete NONE then                          if #get StdConfig.warn_obsolete () then
156                              EM.error source r EM.WARN                              EM.error source r EM.WARN
157                                "old-style operator (obsolete)" EM.nullErrorBody                                "old-style operator (obsolete)" EM.nullErrorBody
158                          else ()                          else ()

Legend:
Removed from v.432  
changed lines
  Added in v.433

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