Mercurial > urweb

diff lib/ur/string.urs @ 1122:85d194409b17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Reduce concatenations of the empty record; unpoly non-recursive functions
author Adam Chlipala <adamc@hcoop.net>
date Sun, 10 Jan 2010 13:44:22 -0500
parents eaba663fd6aa
children 94e83c5533d2
line wrap: on
line diff
--- a/lib/ur/string.urs	Sun Jan 10 10:40:57 2010 -0500
+++ b/lib/ur/string.urs	Sun Jan 10 13:44:22 2010 -0500
@@ -20,3 +20,5 @@
 val msplit : {Haystack : t, Needle : t} -> option (string * char * string)
 
 val all : (char -> bool) -> string -> bool
+
+val newlines : ctx ::: {Unit} -> [[Body] ~ ctx] => string -> xml ([Body] ++ ctx) [] []