r11231: 16 Oct 2006 Kevin Rosenberg <kevin@rosenberg.net>

[clsql.git] / db-postgresql / postgresql-api.lisp

diff --git a/db-postgresql/postgresql-api.lisp b/db-postgresql/postgresql-api.lisp
index b006bf655a733f89f12dd06d1f8965c3ad01655e..e01828cc8e369d0d2c15b238aaf606fa259bc47d 100644 (file)
--- a/db-postgresql/postgresql-api.lisp
+++ b/db-postgresql/postgresql-api.lisp
@@ -138,7 +138,7 @@
     ((res pgsql-result)
      (field-code :int))
   :module "postgresql"
-  :returning (* char))
+  :returning :cstring)
 
 (declaim (inline PQresultErrorMessage))
 (uffi:def-function ("PQresultErrorMessage" PQresultErrorMessage)