]> gitweb.factorcode.org Git - factor.git/commitdiff
db.tuples: simplify recreate-table.
authorJohn Benediktsson <mrjbq7@gmail.com>
Thu, 22 Feb 2018 18:19:50 +0000 (10:19 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Thu, 22 Feb 2018 18:19:50 +0000 (10:19 -0800)
basis/db/tuples/tuples.factor

index 12f783711b3910404a9074f9924e2d3c236cf320..293a9b42e4f9b390f22444ec3922a3a4ff5898af 100644 (file)
@@ -122,17 +122,10 @@ ERROR: no-defined-persistent object ;
     drop-sql-statement [ execute-statement ] with-disposals ;
 
 : recreate-table ( class -- )
-    ensure-defined-persistent
-    [
-        '[
-            [
-                _ drop-sql-statement [ execute-statement ] with-disposals
-            ] ignore-table-missing
-        ] ignore-function-missing
-    ] [ create-table ] bi ;
+    [ '[ [ _ drop-table ] ignore-table-missing ] ignore-function-missing ]
+    [ create-table ] bi ;
 
 : ensure-table ( class -- )
-    ensure-defined-persistent
     '[ [ _ create-table ] ignore-table-exists ] ignore-function-exists ;
 
 : ensure-tables ( classes -- ) [ ensure-table ] each ;