diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-09-13 10:30:45 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-09-13 10:30:45 -0400 |
| commit | 2ad30811b217c0880f8ea65a7da0f755ec0cf9e6 (patch) | |
| tree | a8c55c74f05acc784c8d0afb9237d867b0e3e680 /tests/crud.urs | |
| parent | a12b7d5677662153dd69c14945c0d88f447425a3 (diff) | |
foldTR2
Diffstat (limited to 'tests/crud.urs')
| -rw-r--r-- | tests/crud.urs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/crud.urs b/tests/crud.urs index c021bea3..4741af00 100644 --- a/tests/crud.urs +++ b/tests/crud.urs @@ -1,4 +1,5 @@ -con colMeta = fn cols :: {Type} => $(mapTT (fn t => {Show : t -> xbody}) cols) +con colMeta' = fn t :: Type => {Show : t -> xbody} +con colMeta = fn cols :: {Type} => $(Top.mapTT colMeta' cols) functor Make(M : sig con cols :: {Type} |