Mercurial > urweb

comparison demo/more/dlist.urs @ 1641:68429cfce8db

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Redo HTML context classification, to keep regular <body> tags out of <table> and <tr>
author Adam Chlipala <adam@chlipala.net>
date Tue, 20 Dec 2011 19:02:04 -0500
parents e9c5992bc9bc
children
comparison
equal deleted inserted replaced
1640:dc986eb6113c 1641:68429cfce8db
10 val elements : t ::: Type -> dlist t -> signal (list t) 10 val elements : t ::: Type -> dlist t -> signal (list t)
11 val size : t ::: Type -> dlist t -> signal int 11 val size : t ::: Type -> dlist t -> signal int
12 val numPassing : t ::: Type -> (t -> signal bool) -> dlist t -> signal int 12 val numPassing : t ::: Type -> (t -> signal bool) -> dlist t -> signal int
13 val foldl : t ::: Type -> acc ::: Type -> (t -> acc -> signal acc) -> acc -> dlist t -> signal acc 13 val foldl : t ::: Type -> acc ::: Type -> (t -> acc -> signal acc) -> acc -> dlist t -> signal acc
14 14
15 val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type 15 val render : ctx ::: {Unit} -> [ctx ~ [Dyn]] => t ::: Type
16 -> (t -> position -> xml (ctx ++ body) [] []) 16 -> (t -> position -> xml (ctx ++ [Dyn]) [] [])
17 -> {StartPosition : signal (option int), 17 -> {StartPosition : signal (option int),
18 MaxLength : signal (option int), 18 MaxLength : signal (option int),
19 Filter : t -> signal bool, 19 Filter : t -> signal bool,
20 Sort : signal (option (t -> t -> signal bool)) (* <= *)} 20 Sort : signal (option (t -> t -> signal bool)) (* <= *)}
21 -> dlist t 21 -> dlist t
22 -> xml (ctx ++ body) [] [] 22 -> xml (ctx ++ [Dyn]) [] []