Mercurial > urweb
diff lib/basis.urs @ 268:bacd0ba869e1
Monoize ASC/DESC
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 31 Aug 2008 16:54:13 -0400 |
parents | 645d0e8da643 |
children | fdd7a698be01 |
line wrap: on
line diff
--- a/lib/basis.urs Sun Aug 31 16:32:49 2008 -0400 +++ b/lib/basis.urs Sun Aug 31 16:54:13 2008 -0400 @@ -73,7 +73,7 @@ con sql_order_by :: {{Type}} -> {Type} -> Type val sql_order_by_Nil : tables ::: {{Type}} -> exps :: {Type} -> sql_order_by tables exps val sql_order_by_Cons : tables ::: {{Type}} -> exps ::: {Type} -> t ::: Type - -> sql_exp tables [] exps t -> sql_order_by tables exps + -> sql_exp tables [] exps t -> sql_direction -> sql_order_by tables exps -> sql_order_by tables exps type sql_limit