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 363, Fri Jul 2 02:45:45 1999 UTC revision 364, Fri Jul 2 07:33:12 1999 UTC
# Line 33  Line 33 
33         | gprivspec of S.privilegespec         | gprivspec of S.privilegespec
34         | lprivspec of S.privilegespec         | lprivspec of S.privilegespec
35         | wrapspec of S.privilegespec -> S.privilegespec         | wrapspec of S.privilegespec -> S.privilegespec
36           | mand_exports of S.exports
37         | opt_exports of S.exports option         | opt_exports of S.exports option
38         | exports of S.exports         | exports of S.exports
39         | export of S.exports         | export of S.exports
# Line 92  Line 93 
93  group : gprivspec opt_exports IS members        (S.group  group : gprivspec opt_exports IS members        (S.group
94                                                   (grouppath,                                                   (grouppath,
95                                                    gprivspec, opt_exports,                                                    gprivspec, opt_exports,
96                                                    members,                                                    members, gp))
97                                                    error (opt_exportsleft,        | lprivspec mand_exports IS members       (S.library
                                                          opt_exportsright),  
                                                   gp))  
       | lprivspec exports IS members            (S.library  
98                                                   (grouppath,                                                   (grouppath,
99                                                    lprivspec, exports, members,                                                    lprivspec, mand_exports,
100                                                    error (exportsleft,                                                    members, gp))
                                                          exportsright),  
                                                   gp))  
101    
102  wrapspec : (* empty *)                         (fn p => p)  wrapspec : (* empty *)                         (fn p => p)
103            | wrapspec word                      (fn p =>            | wrapspec word                      (fn p =>
# Line 120  Line 116 
116                                                                     wordright)))                                                                     wordright)))
117            | LPAREN wrapspec RPAREN lprivspec    (wrapspec lprivspec)            | LPAREN wrapspec RPAREN lprivspec    (wrapspec lprivspec)
118    
119  exports : export                                (export)  mand_exports : export                           (export)
120          | export exports                        (S.exports (export, exports))               | mand_exports export              (S.exports (mand_exports,
121                                                                export))
122    
123  opt_exports : (* empty *)                       (NONE)  opt_exports : (* empty *)                       (NONE)
124              | exports                           (SOME exports)              | mand_exports                      (SOME mand_exports)
125    
126    exports : (* empty *)                           (S.emptyExports)
127            | exports export                        (S.exports (exports, export))
128    
129  export : ml_symbol                              (S.export  export : ml_symbol                              (S.export
130                                                   (ml_symbol,                                                   (ml_symbol,

Legend:
Removed from v.363  
changed lines
  Added in v.364

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