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/branches/dbm-type-blame/cm/parse/cm.lex
ViewVC logotype

Diff of /sml/branches/dbm-type-blame/cm/parse/cm.lex

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

revision 3593, Wed May 11 03:44:12 2011 UTC revision 3594, Thu May 12 16:06:32 2011 UTC
# Line 81  Line 81 
81                ("mod", plain (fn (x, y) => Tokens.MULSYM (S.MOD, x, y))),                ("mod", plain (fn (x, y) => Tokens.MULSYM (S.MOD, x, y))),
82                ("andalso", plain Tokens.ANDALSO),                ("andalso", plain Tokens.ANDALSO),
83                ("orelse", plain Tokens.ORELSE),                ("orelse", plain Tokens.ORELSE),
84                ("not", plain Tokens.NOT)]                ("not", plain Tokens.NOT),
85                  ("true", plain Tokens.TRUE),
86                  ("false", plain Tokens.FALSE)]
87    
88  fun idToken (t, p, idlist, default, chstate, in_section2) =  fun idToken (t, p, idlist, default, chstate, in_section2) =
89      case List.find (fn (id, _) => id = t) ml_ids of      case List.find (fn (id, _) => id = t) ml_ids of

Legend:
Removed from v.3593  
changed lines
  Added in v.3594

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