diff options
author | 2012-12-27 15:34:11 -0500 | |
---|---|---|
committer | 2012-12-27 15:34:11 -0500 | |
commit | 53c633b53e8825cb9058fb88e86d1ca7828b83e6 (patch) | |
tree | 94682452c654491c184a8e2d43d3dbfdb4e46cf9 /lib/ur/list.urs | |
parent | bf6fbd81d4e60a87b19f8c8149349217b4620360 (diff) |
Add some name-mangling rules to allow XML attribute 'name' and attributes with dashes
Diffstat (limited to 'lib/ur/list.urs')
-rw-r--r-- | lib/ur/list.urs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/ur/list.urs b/lib/ur/list.urs index b26c9ad9..66007a39 100644 --- a/lib/ur/list.urs +++ b/lib/ur/list.urs @@ -63,6 +63,9 @@ val all : a ::: Type -> (a -> bool) -> t a -> bool val app : m ::: (Type -> Type) -> monad m -> a ::: Type -> (a -> m unit) -> t a -> m unit +val tabulateM : m ::: (Type -> Type) -> monad m -> a ::: Type + -> (int -> m a) -> int -> m (t a) + val mapQuery : tables ::: {{Type}} -> exps ::: {Type} -> t ::: Type -> [tables ~ exps] => sql_query [] [] tables exps |