Mercurial > urweb
diff tests/crud.urs @ 346:a94a79820d49
Small clean-ups in crud; Compiler.check
| author | Adam Chlipala <adamc@hcoop.net> |
|---|---|
| date | Sat, 04 Oct 2008 15:54:03 -0400 |
| parents | 389399d65331 |
| children | 2205d5cb416a |
line wrap: on
line diff
--- a/tests/crud.urs Sat Oct 04 15:50:28 2008 -0400 +++ b/tests/crud.urs Sat Oct 04 15:54:03 2008 -0400 @@ -6,7 +6,7 @@ Parse : t_formT.2 -> t_formT.1, Inject : sql_injectable t_formT.1 } -con colsMeta = fn cols :: {(Type * Type)} => $(Top.mapT2T colMeta cols) +con colsMeta = fn cols :: {(Type * Type)} => $(mapT2T colMeta cols) functor Make(M : sig con cols :: {(Type * Type)}