summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-04-07 16:14:31 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-04-07 16:14:31 -0400
commita4849d43a72070576fbb7a0d3a48956948152899 (patch)
tree6fa2aa05d829b2b71c6e2d778b4898999992a00f /tests
parente56ecefbc8cc0251d30511ec8c6cdc8dca25a263 (diff)
PRIMARY KEY
Diffstat (limited to 'tests')
-rw-r--r--tests/cst.ur2
-rw-r--r--tests/pkey.ur6
-rw-r--r--tests/pkey.urp5
3 files changed, 13 insertions, 0 deletions
diff --git a/tests/cst.ur b/tests/cst.ur
index 0ebcc977..fc3b0816 100644
--- a/tests/cst.ur
+++ b/tests/cst.ur
@@ -1,4 +1,6 @@
table t : {A : int, B : int}
+ PRIMARY KEY B,
+
CONSTRAINT UniA UNIQUE A,
CONSTRAINT UniB UNIQUE B,
CONSTRAINT UniBoth UNIQUE (A, B),
diff --git a/tests/pkey.ur b/tests/pkey.ur
new file mode 100644
index 00000000..4efbd032
--- /dev/null
+++ b/tests/pkey.ur
@@ -0,0 +1,6 @@
+table t : {A : int, B : int}
+ PRIMARY KEY (A, B)
+
+fun main () : transaction page =
+ queryI (SELECT * FROM t) (fn _ => return ());
+ return <xml/>
diff --git a/tests/pkey.urp b/tests/pkey.urp
new file mode 100644
index 00000000..40ff2589
--- /dev/null
+++ b/tests/pkey.urp
@@ -0,0 +1,5 @@
+debug
+database dbname=pkey
+sql pkey.sql
+
+pkey