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

db.queries: add ensure-index

char-rename
Alexander Iljin 2016-02-20 22:14:02 +04:00 committed by John Benediktsson
parent 9c9764cc2d
commit e606ce278d
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/db/queries/queries.factor
View File

@ -206,6 +206,9 @@ M: db-connection <count-statement> ( query -- statement )
"," join % ")" % "," join % ")" %
] "" make sql-command ; ] "" make sql-command ;
: ensure-index ( index-name table-name columns -- )
'[ _ _ _ create-index ] ignore-index-exists ;
: drop-index ( index-name -- ) : drop-index ( index-name -- )
[ "drop index " % % ] "" make sql-command ; [ "drop index " % % ] "" make sql-command ;