(sort (clsql:list-table-indexes [company] :owner *test-database-user*)
#'string-lessp)
(progn
(clsql:drop-index [bar] :on [i3test])
(clsql:drop-index [foo] :on [i3test])
(sort (clsql:list-table-indexes [company] :owner *test-database-user*)
#'string-lessp)
(progn
(clsql:drop-index [bar] :on [i3test])
(clsql:drop-index [foo] :on [i3test])