X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=tests%2Ftest-basic.lisp;h=a6a501ec1a3e8606d2d7eb9988fadada71565b9c;hp=34b3f25ffe60bbf9d43db3fc5281ac66b84e1b2f;hb=86440ca219f801a087ad917d1c1f46c77c920aa4;hpb=a223800f208347e8a07f597648fcdb6c05ec5afe diff --git a/tests/test-basic.lisp b/tests/test-basic.lisp index 34b3f25..a6a501e 100644 --- a/tests/test-basic.lisp +++ b/tests/test-basic.lisp @@ -165,10 +165,6 @@ (let ((*read-default-float-format* 'double-float)) (coerce (read-from-string num-str) 'double-float))) -(defun test-table-row (row types) -) - - (defun double-float-equal (a b) (if (zerop a) (if (zerop b)