X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=interfaces%2Fmysql%2Fmysql-usql.cl;h=311bf67df13ef78b561ffa5533e15e4d7811848c;hb=1c5d72b7272f9e2375b2b0f85ef7ea0debab6960;hp=59a23b44f2a46e8bcd4e14bfe03dff71ea876242;hpb=d302d2db4f7ff7a31bce893e31aecbc2a84a162f;p=clsql.git

diff --git a/interfaces/mysql/mysql-usql.cl b/interfaces/mysql/mysql-usql.cl
index 59a23b4..311bf67 100644
--- a/interfaces/mysql/mysql-usql.cl
+++ b/interfaces/mysql/mysql-usql.cl
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg and onShore Development Inc
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: mysql-usql.cl,v 1.5 2002/04/27 21:48:08 kevin Exp $
+;;;; $Id: mysql-usql.cl,v 1.6 2002/05/27 17:19:30 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;; and by onShore Development Inc.
@@ -80,6 +80,7 @@
 
 ;; Misc USQL functions
 
+#|
 #+ignore
 (defmethod database-output-sql ((expr clsql-sys::sql-typecast-exp) 
 				(database mysql-database))
@@ -101,3 +102,4 @@
     (make-instance 'clsql-sys::sql-typecast-exp
                    :modifier 'int8
                    :components val)))
+|#