X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-mysql%2Fmysql-objects.lisp;h=93a802f762ca3be7cefaa5229e0e894097373610;hp=015edbb6501791e3a45f82889f10ffc6f7ebfe9c;hb=f103c1a5416d2f22820d66020e4f9c18c766d894;hpb=151c009059521769a44ec35dfdceb86d5373af99 diff --git a/db-mysql/mysql-objects.lisp b/db-mysql/mysql-objects.lisp index 015edbb..93a802f 100644 --- a/db-mysql/mysql-objects.lisp +++ b/db-mysql/mysql-objects.lisp @@ -33,16 +33,6 @@ (declare (ignore args database)) "TINYINT") -(defmethod database-output-sql-as-type ((type (eql 'boolean)) val database - (db-type (eql :mysql))) - (declare (ignore database)) - (if val 1 0)) - -(defmethod database-output-sql-as-type ((type (eql 'generalized-boolean)) val database - (db-type (eql :mysql))) - (declare (ignore database)) - (if val 1 0)) - (defmethod read-sql-value (val (type (eql 'boolean)) database (db-type (eql :mysql))) (declare (ignore database))