Fixing SQLite unit tests

diff --git a/basis/db/sqlite/sqlite-tests.factor b/basis/db/sqlite/sqlite-tests.factor
index 677ec17a6e537e36f3065cf47abe4dd91d46b674..fd730f07ae4bdd4719e01f1e0e8112396ca6155e 100644 (file)
--- a/basis/db/sqlite/sqlite-tests.factor
+++ b/basis/db/sqlite/sqlite-tests.factor
@@ -117,7 +117,7 @@ hi "HELLO" {
         1 <foo> insert-tuple
         f <foo> select-tuple
         1 1 <hi> insert-tuple
-        f <hi> select-tuple
+        f f <hi> select-tuple
         hi drop-table
         foo drop-table
     ] with-db
@@ -160,6 +160,7 @@ watch "WATCH" {
         show new insert-tuple
         show new select-tuple
         "littledan" f user boa select-tuple
+        swap [ username>> ] [ id>> ] bi*
         watch boa insert-tuple
         watch new select-tuple
         user>> f user boa select-tuple