X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftest-basic.lisp;h=a13c76efabad754aec378c875a4ab18318880f79;hb=afc88420d03b627b214473078c3adc201de2de80;hp=e57ee2875a64a2519debe5956784a2983ffb0a11;hpb=6e8ef7161f2d2759bf8d78740e7e93bea5eca781;p=clsql.git

diff --git a/tests/test-basic.lisp b/tests/test-basic.lisp
index e57ee28..a13c76e 100644
--- a/tests/test-basic.lisp
+++ b/tests/test-basic.lisp
@@ -53,7 +53,7 @@
     (test-table-row (list int float bigint str) nil type))
   (do-query ((int float bigint str) "select * from test_clsql" :result-types :auto)
     (test-table-row (list int float bigint str) :auto type))
-  #+ignore (drop-test-table db))
+  (drop-test-table db))
 
 
 (defun %test-basic-untyped (db type)
@@ -84,7 +84,7 @@
     (clsql:execute-command 
      "DROP TABLE test_clsql" :database db))
   (clsql:execute-command 
-   "CREATE TABLE test_clsql (t_int integer, t_float double, t_bigint BIGINT, t_str CHAR(30))" 
+   "CREATE TABLE test_clsql (t_int integer, t_float double precision, t_bigint BIGINT, t_str CHAR(30))" 
    :database db)
   (dotimes (i 11)
     (let* ((test-int (- i 5))