Mercurial > urweb
comparison src/source.sml @ 123:e3041657d653
Parsing and elaborating (non-mutual) 'val rec'
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 17 Jul 2008 10:09:34 -0400 |
parents | 813e5a52063d |
children | 7420fa18d657 |
comparison
equal
deleted
inserted
replaced
122:f7c6ceb87bbd | 123:e3041657d653 |
---|---|
105 withtype exp = exp' located | 105 withtype exp = exp' located |
106 | 106 |
107 datatype decl' = | 107 datatype decl' = |
108 DCon of string * kind option * con | 108 DCon of string * kind option * con |
109 | DVal of string * con option * exp | 109 | DVal of string * con option * exp |
110 | DValRec of (string * con option * exp) list | |
110 | DSgn of string * sgn | 111 | DSgn of string * sgn |
111 | DStr of string * sgn option * str | 112 | DStr of string * sgn option * str |
112 | DFfiStr of string * sgn | 113 | DFfiStr of string * sgn |
113 | DOpen of string * string list | 114 | DOpen of string * string list |
114 | DConstraint of con * con | 115 | DConstraint of con * con |