Mercurial > urweb
comparison src/expl.sml @ 124:541282b81454
Explifying (non-mutual) 'val rec'
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 17 Jul 2008 10:13:18 -0400 |
parents | 813e5a52063d |
children | 7420fa18d657 |
comparison
equal
deleted
inserted
replaced
123:e3041657d653 | 124:541282b81454 |
---|---|
95 and sgn = sgn' located | 95 and sgn = sgn' located |
96 | 96 |
97 datatype decl' = | 97 datatype decl' = |
98 DCon of string * int * kind * con | 98 DCon of string * int * kind * con |
99 | DVal of string * int * con * exp | 99 | DVal of string * int * con * exp |
100 | DValRec of (string * int * con * exp) list | |
100 | DSgn of string * int * sgn | 101 | DSgn of string * int * sgn |
101 | DStr of string * int * sgn * str | 102 | DStr of string * int * sgn * str |
102 | DFfiStr of string * int * sgn | 103 | DFfiStr of string * int * sgn |
103 | DExport of int * sgn * str | 104 | DExport of int * sgn * str |
104 | 105 |