Mercurial > urweb
diff demo/more/dlist.urs @ 952:07569af40069
Insert dummy Sort parameter
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 17 Sep 2009 14:42:02 -0400 |
parents | 103ac1792c41 |
children | 2a50da66ffd8 |
line wrap: on
line diff
--- a/demo/more/dlist.urs Thu Sep 17 14:27:00 2009 -0400 +++ b/demo/more/dlist.urs Thu Sep 17 14:42:02 2009 -0400 @@ -10,6 +10,7 @@ val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type -> (t -> position -> xml (ctx ++ body) [] []) - -> {Filter : t -> signal bool} + -> {Filter : t -> signal bool, + Sort : signal (option (t -> t -> signal bool)) (* <= *)} -> dlist t -> xml (ctx ++ body) [] []