Mercurial > urweb

comparison lib/ur/list.urs @ 908:ed06e25c70ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Convert to requiring explicit 'rpc' marker
author Adam Chlipala <adamc@hcoop.net>
date Sat, 22 Aug 2009 12:55:18 -0400
parents 1c2f335297b7
children b873feb3eb52
comparison
equal deleted inserted replaced
907:5fe49effbc83 908:ed06e25c70ef
41 val all : a ::: Type -> (a -> bool) -> t a -> bool 41 val all : a ::: Type -> (a -> bool) -> t a -> bool
42 42
43 val app : m ::: (Type -> Type) -> monad m -> a ::: Type 43 val app : m ::: (Type -> Type) -> monad m -> a ::: Type
44 -> (a -> m unit) -> t a -> m unit 44 -> (a -> m unit) -> t a -> m unit
45 45
46 val mapQuery : tables ::: {{Type}} -> exps ::: {Type} -> t ::: Type
47 -> [tables ~ exps] =>
48 sql_query tables exps
49 -> ($(exps ++ map (fn fields :: {Type} => $fields) tables) -> t)
50 -> transaction (list t)
46 51
47 (** Association lists *) 52 (** Association lists *)
48 53
49 val assoc : a ::: Type -> b ::: Type -> eq a -> a -> t (a * b) -> option b 54 val assoc : a ::: Type -> b ::: Type -> eq a -> a -> t (a * b) -> option b
50 55