aboutsummaryrefslogtreecommitdiffhomepage
path: root/tests/aborter.ur
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-10-24 16:47:18 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-10-24 16:47:18 -0400
commit4f82b8197a0e0b520882c0173f321bd948fc7b50 (patch)
treee31ecf97ee6f1ea13fec2933c85e987d660e0871 /tests/aborter.ur
parentd27809108ef5ce4ed389cd39562e0dabb4a38c75 (diff)
Transactions seem to be working
Diffstat (limited to 'tests/aborter.ur')
-rw-r--r--tests/aborter.ur5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/aborter.ur b/tests/aborter.ur
new file mode 100644
index 00000000..0921bdfc
--- /dev/null
+++ b/tests/aborter.ur
@@ -0,0 +1,5 @@
+table t : {A : int}
+
+fun main () : transaction page =
+ () <- dml (INSERT INTO t (A) VALUES (0));
+ return (error <xml>No way, Jose!</xml>)