update oracle/ffi backend. close debian bug

[clsql.git] / db-oracle / oracle-sql.lisp

diff --git a/db-oracle/oracle-sql.lisp b/db-oracle/oracle-sql.lisp
index 87d1137ff910b29505c79c7fef7f83851224152d..b0f5457417af9918874c9a138a4d830604d05bce 100644 (file)
--- a/db-oracle/oracle-sql.lisp
+++ b/db-oracle/oracle-sql.lisp
@@ -366,9 +366,9 @@ the length of that format.")
 ;; STREAM which has no more data, and QC is not a STREAM, we signal
 ;; DBI-ERROR instead.
 
-(uffi:def-type short-array (:array :short nil))
-(uffi:def-type int-array (:array :int nil))
-(uffi:def-type double-array (:array :double nil))
+(uffi:def-type short-array (* :short))
+(uffi:def-type int-array (* :int))
+(uffi:def-type double-array (* :double))
 (uffi:def-type int-pointer (* :int))
 (uffi:def-type double-pointer (* :double))