[MLton-commit] r5211

[Wesley Terpstra]

there is some bug with passing the error through... i blame sqlite3
----------------------------------------------------------------------

U   mltonlib/trunk/ca/terpstra/sqlite3/prim.sml

----------------------------------------------------------------------

Modified: mltonlib/trunk/ca/terpstra/sqlite3/prim.sml
===================================================================
--- mltonlib/trunk/ca/terpstra/sqlite3/prim.sml	2007-02-15 23:11:44 UTC (rev 5210)
+++ mltonlib/trunk/ca/terpstra/sqlite3/prim.sml	2007-02-15 23:16:30 UTC (rev 5211)
@@ -271,8 +271,7 @@
             val args = Vector.tabulate (numargs, get)
             fun error s = Presult_error (context, CStr.fromString s, String.size s)
          in
-            error ("zomg the pain!")
-(*            f (context, args) *)
+            f (context, args)
             handle Error x => error ("fatal: " ^ x)
             handle Retry x => error ("retry: " ^ x)
             handle Abort x => error ("abort: " ^ x)