;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.\r
;;;; *************************************************************************\r
\r
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.\r
;;;; *************************************************************************\r
\r
(defmethod source-file-type ((c cl-source-file)\r
(s (eql (find-system :clsql-postgresql-socket)))) \r
"cl")\r
(defmethod source-file-type ((c cl-source-file)\r
(s (eql (find-system :clsql-postgresql-socket)))) \r
"cl")\r