X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-basic.lisp;h=37639e311df1d587e3ce1a6ac18fe1b03b7ccb47;hb=1751e5245c270bd1ee854a98dfe6caa665abe34e;hp=a6a501ec1a3e8606d2d7eb9988fadada71565b9c;hpb=86440ca219f801a087ad917d1c1f46c77c920aa4;p=clsql.git diff --git a/tests/test-basic.lisp b/tests/test-basic.lisp index a6a501e..37639e3 100644 --- a/tests/test-basic.lisp +++ b/tests/test-basic.lisp @@ -45,9 +45,7 @@ (destructuring-bind (int float bigint str) row (push (list (integerp int) (typep float 'double-float) - (if (member *test-database-type* '(:odbc :aodbc)) - t - (integerp bigint)) + (integerp bigint) (stringp str)) results)))) ((t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t) (t t t t)))