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/cm.lex
ViewVC logotype

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

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

revision 274, Fri May 14 05:23:02 1999 UTC revision 275, Sat May 15 09:54:52 1999 UTC
# Line 44  Line 44 
44      val start = findGraph (5 + findError 0)      val start = findGraph (5 + findError 0)
45      val msg = String.extract (t, start, NONE)      val msg = String.extract (t, start, NONE)
46  in  in
47      Tokens.ERROR (msg, p, p + size t)      Tokens.ERROR (msg, p + 1, p + size t)
48  end  end
49    
50  val cm_ids = [("Alias", Tokens.ALIAS),  val cm_ids = [("Alias", Tokens.ALIAS),

Legend:
Removed from v.274  
changed lines
  Added in v.275

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