comparison src/cjr.sml @ 121:91027db5a07c

Multiple arguments to web functions
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Jul 2008 20:24:05 -0400
parents 6230bdd122e7
children 78d59cf0a0cc
comparison
equal deleted inserted replaced
120:6230bdd122e7 121:91027db5a07c
55 withtype exp = exp' located 55 withtype exp = exp' located
56 56
57 datatype decl' = 57 datatype decl' =
58 DStruct of int * (string * typ) list 58 DStruct of int * (string * typ) list
59 | DVal of string * int * typ * exp 59 | DVal of string * int * typ * exp
60 | DFun of string * int * string * typ * typ * exp 60 | DFun of string * int * (string * typ) list * typ * exp
61 61
62 withtype decl = decl' located 62 withtype decl = decl' located
63 63
64 type file = decl list * (string * int * typ list) list 64 type file = decl list * (string * int * typ list) list
65 65