projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r8873: better generic function
[clsql.git]
/
db-postgresql
/
postgresql-sql.lisp
diff --git
a/db-postgresql/postgresql-sql.lisp
b/db-postgresql/postgresql-sql.lisp
index c268b82eb2d9463ab15c77d0b79c88f7dff7a706..394c0d629d73865d5014dba2ed16aee930b4d13b 100644
(file)
--- a/
db-postgresql/postgresql-sql.lisp
+++ b/
db-postgresql/postgresql-sql.lisp
@@
-216,7
+216,8
@@
(num-fields 0 :type integer)
(tuple-index 0 :type integer))
(num-fields 0 :type integer)
(tuple-index 0 :type integer))
-(defmethod database-query-result-set (query-expression (database postgresql-database)
+(defmethod database-query-result-set ((query-expression string)
+ (database postgresql-database)
&key full-set types)
(let ((conn-ptr (database-conn-ptr database)))
(declare (type pgsql-conn-def conn-ptr))
&key full-set types)
(let ((conn-ptr (database-conn-ptr database)))
(declare (type pgsql-conn-def conn-ptr))