summaryrefslogtreecommitdiff
path: root/demo/more/dlist.urs
blob: 872dabcd31f0657f024cc91de66f8d16d6b12b3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
con dlist :: Type -> Type
type position

val create : t ::: Type -> transaction (dlist t)
val clear : t ::: Type -> dlist t -> transaction unit
val append : t ::: Type -> dlist t -> t -> transaction position
val delete : position -> transaction unit
val elements : t ::: Type -> dlist t -> signal (list t)

val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type
             -> (t -> position -> xml (ctx ++ body) [] [])
             -> dlist t
             -> xml (ctx ++ body) [] []