steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

db.tuples: simplify recreate-table.

windows-high-dpi
John Benediktsson 2018-02-22 10:19:50 -08:00
parent 2a9b40f033
commit d573d44da1
1 changed files with 2 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
basis/db/tuples/tuples.factor
View 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 ;