diff --git a/basis/db/sqlite/sqlite-tests.factor b/basis/db/sqlite/sqlite-tests.factor index 529de9774b..5ad4b0c889 100644 --- a/basis/db/sqlite/sqlite-tests.factor +++ b/basis/db/sqlite/sqlite-tests.factor @@ -163,3 +163,5 @@ watch "WATCH" { user>> f user boa select-tuple ] with-db ] unit-test + +[ \ swap ensure-table ] must-fail