comparison src/cjr.sml @ 273:09c66a30ef32

Table declarations pushed to Cjr
author Adam Chlipala <adamc@hcoop.net>
date Tue, 02 Sep 2008 13:09:54 -0400
parents 42dfb0d61cf0
children 0236d9412ad2
comparison
equal deleted inserted replaced
272:4d80d6122df1 273:09c66a30ef32
85 | DDatatype of datatype_kind * string * int * (string * int * typ option) list 85 | DDatatype of datatype_kind * string * int * (string * int * typ option) list
86 | DDatatypeForward of datatype_kind * string * int 86 | DDatatypeForward of datatype_kind * string * int
87 | DVal of string * int * typ * exp 87 | DVal of string * int * typ * exp
88 | DFun of string * int * (string * typ) list * typ * exp 88 | DFun of string * int * (string * typ) list * typ * exp
89 | DFunRec of (string * int * (string * typ) list * typ * exp) list 89 | DFunRec of (string * int * (string * typ) list * typ * exp) list
90
91 | DTable of string * (string * typ) list
90 | DDatabase of string 92 | DDatabase of string
91 93
92 withtype decl = decl' located 94 withtype decl = decl' located
93 95
94 type file = decl list * (Core.export_kind * string * int * typ list) list 96 type file = decl list * (Core.export_kind * string * int * typ list) list