summaryrefslogtreecommitdiff
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
commit6dbd6e0786f8ab1b5b35883dca6695cf58272b5b (patch)
treee31ecf97ee6f1ea13fec2933c85e987d660e0871 /tests/aborter.ur
parentbb640a6174757adb8693d25c831728699e23d68b (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>)