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.grm
ViewVC logotype

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

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

revision 536, Fri Feb 18 16:51:54 2000 UTC revision 537, Fri Feb 18 17:20:16 2000 UTC
# Line 54  Line 54 
54    
55  %pos int  %pos int
56  %verbose  %verbose
57  %arg (grouppath, context, obsolete, error, doMember, curlib, gp) :  %arg (grouppath, context, obsolete, error, doMember, curlib, gp, ig) :
58      S.pathname *      S.pathname *
59      S.context *      S.context *
60      (pos * pos -> unit) *      (pos * pos -> unit) *
# Line 62  Line 62 
62      ({ name: string, mkpath: string -> S.pathname } *      ({ name: string, mkpath: string -> S.pathname } *
63       pos * pos * S.cm_class option -> S.members) *       pos * pos * S.cm_class option -> S.members) *
64      S.pathname option *      S.pathname option *
65      GeneralParams.info      GeneralParams.info *
66        S.group
67  %start description  %start description
68  %eop EOF  %eop EOF
69  %noshift EOF  %noshift EOF
# Line 91  Line 92 
92                                                    gprivspec, opt_exports,                                                    gprivspec, opt_exports,
93                                                    members, gp, curlib, owner,                                                    members, gp, curlib, owner,
94                                                    error (ownerleft,                                                    error (ownerleft,
95                                                           ownerright)))                                                           ownerright),
96                                                      ig))
97        | lprivspec mand_exports IS members      (S.library        | lprivspec mand_exports IS members      (S.library
98                                                   (grouppath,                                                   (grouppath,
99                                                    lprivspec, mand_exports,                                                    lprivspec, mand_exports,
100                                                    members, gp))                                                    members, gp, ig))
101    
102  owner : (* empty *)                            (NONE)  owner : (* empty *)                            (NONE)
103        | LPAREN pathname RPAREN                 (SOME (#mkpath pathname        | LPAREN pathname RPAREN                 (SOME (#mkpath pathname

Legend:
Removed from v.536  
changed lines
  Added in v.537

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