Mercurial > urweb
comparison src/mono.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 | c0e4ac23522d |
comparison
equal
deleted
inserted
replaced
272:4d80d6122df1 | 273:09c66a30ef32 |
---|---|
88 datatype decl' = | 88 datatype decl' = |
89 DDatatype of string * int * (string * int * typ option) list | 89 DDatatype of string * int * (string * int * typ option) list |
90 | DVal of string * int * typ * exp * string | 90 | DVal of string * int * typ * exp * string |
91 | DValRec of (string * int * typ * exp * string) list | 91 | DValRec of (string * int * typ * exp * string) list |
92 | DExport of Core.export_kind * string * int * typ list | 92 | DExport of Core.export_kind * string * int * typ list |
93 | |
94 | DTable of string * (string * typ) list | |
93 | DDatabase of string | 95 | DDatabase of string |
94 | 96 |
95 withtype decl = decl' located | 97 withtype decl = decl' located |
96 | 98 |
97 type file = decl list | 99 type file = decl list |