Mercurial > urweb
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 |