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/compiler/Parse/parse/ml.grm
ViewVC logotype

Diff of /sml/trunk/src/compiler/Parse/parse/ml.grm

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

revision 78, Fri Apr 17 17:58:14 1998 UTC revision 79, Sat Apr 18 00:19:45 1998 UTC
# Line 36  Line 36 
36      | STRING of string      | STRING of string
37      | CHAR of string      | CHAR of string
38      | ABSTYPE | AND      | ABSTYPE | AND
39      | ARROW | AS | BAR | CASE | DATATYPE | DOTDOTDOT | ELSE | END | EQUALOP      | ARROW | AS | ASSERT | BAR | CASE | DATATYPE | DOTDOTDOT | ELSE | END | EQUALOP
40      | EQTYPE | EXCEPTION | DO | DOT | DARROW | FN | FUN | FUNCTOR | HANDLE      | EQTYPE | EXCEPTION | DO | DOT | DARROW | FN | FUN | FUNCTOR | HANDLE
41      | HASH | IF | IN | INCLUDE | INFIX | INFIXR | LAZY | LET | LOCAL | NONFIX | OF      | HASH | IF | IN | INCLUDE | INFIX | INFIXR | LAZY | LET | LOCAL | NONFIX | OF
42      | OP | OPEN | OVERLOAD | RAISE | REC | SHARING | SIG | SIGNATURE | STRUCT      | OP | OPEN | OVERLOAD | RAISE | REC | SHARING | SIG | SIGNATURE | STRUCT
# Line 154  Line 154 
154    
155  %name ML  %name ML
156    
157  %keyword ABSTYPE AND AS CASE DATATYPE DOTDOTDOT ELSE END  %keyword ABSTYPE AND AS ASSERT CASE DATATYPE DOTDOTDOT ELSE END
158    EQTYPE EXCEPTION  DO  DARROW  FN  FUN  FUNCTOR  HANDLE    EQTYPE EXCEPTION  DO  DARROW  FN  FUN  FUNCTOR  HANDLE
159    IF IN INCLUDE  INFIX  INFIXR  LAZY LET  LOCAL  NONFIX  OF  OP    IF IN INCLUDE  INFIX  INFIXR  LAZY LET  LOCAL  NONFIX  OF  OP
160    OPEN OVERLOAD  RAISE  REC  SHARING  SIG  SIGNATURE  STRUCT    OPEN OVERLOAD  RAISE  REC  SHARING  SIG  SIGNATURE  STRUCT
# Line 261  Line 261 
261                                     elseCase=markexp(exp3,exp3left,exp3right)})                                     elseCase=markexp(exp3,exp3left,exp3right)})
262           | RAISE exp         (markexp(markexp(RaiseExp exp, expleft,expright),           | RAISE exp         (markexp(markexp(RaiseExp exp, expleft,expright),
263                                        RAISEleft,expright))                                        RAISEleft,expright))
264             | ASSERT exp        (markexp(markexp(AssertExp exp, expleft,expright),
265                                          ASSERTleft,expright))
266    
267  app_exp : aexp          ([{item=markexp(aexp,aexpleft,aexpright),  app_exp : aexp          ([{item=markexp(aexp,aexpleft,aexpright),
268                             region=(aexpleft,aexpright), fixity=NONE}])                             region=(aexpleft,aexpright), fixity=NONE}])

Legend:
Removed from v.78  
changed lines
  Added in v.79

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