Mercurial > urweb
comparison demo/more/dlist.urs @ 963:6f9d1565de56
Testing Dlist MaxLength with constant value
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 19 Sep 2009 13:55:37 -0400 |
parents | 7e7edfb6fe82 |
children | fbc3a0eef45a |
comparison
equal
deleted
inserted
replaced
962:7e7edfb6fe82 | 963:6f9d1565de56 |
---|---|
11 val foldl : t ::: Type -> acc ::: Type -> (t -> acc -> signal acc) -> acc -> dlist t -> signal acc | 11 val foldl : t ::: Type -> acc ::: Type -> (t -> acc -> signal acc) -> acc -> dlist t -> signal acc |
12 | 12 |
13 val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type | 13 val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type |
14 -> (t -> position -> xml (ctx ++ body) [] []) | 14 -> (t -> position -> xml (ctx ++ body) [] []) |
15 -> {StartPosition : signal (option int), | 15 -> {StartPosition : signal (option int), |
16 MaxLength : signal (option int), | |
16 Filter : t -> signal bool, | 17 Filter : t -> signal bool, |
17 Sort : signal (option (t -> t -> signal bool)) (* <= *)} | 18 Sort : signal (option (t -> t -> signal bool)) (* <= *)} |
18 -> dlist t | 19 -> dlist t |
19 -> xml (ctx ++ body) [] [] | 20 -> xml (ctx ++ body) [] [] |