From d573d44da1b36d8f63dfc663365720684b752eb2 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Thu, 22 Feb 2018 10:19:50 -0800
Subject: [PATCH] db.tuples: simplify recreate-table.

---
 basis/db/tuples/tuples.factor | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/basis/db/tuples/tuples.factor b/basis/db/tuples/tuples.factor
index 12f783711b..293a9b42e4 100644
--- a/basis/db/tuples/tuples.factor
+++ b/basis/db/tuples/tuples.factor
@@ -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 ;