Mercurial > urweb
diff lib/ur/basis.urs @ 1293:acabf3935060
tryDml
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 05 Sep 2010 14:00:57 -0400 |
parents | a671c986f517 |
children | b106ca8200b1 |
line wrap: on
line diff
--- a/lib/ur/basis.urs Sun Sep 05 12:50:06 2010 -0400 +++ b/lib/ur/basis.urs Sun Sep 05 14:00:57 2010 -0400 @@ -535,6 +535,8 @@ type dml val dml : dml -> transaction unit +val tryDml : dml -> transaction (option string) +(* Returns an error message on failure. *) val insert : fields ::: {Type} -> uniques ::: {{Unit}} -> sql_table fields uniques