projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Version 6.7.2: Now licensed under more permissive MIT license
[clsql.git]
/
db-oracle
/
oracle-sql.lisp
diff --git
a/db-oracle/oracle-sql.lisp
b/db-oracle/oracle-sql.lisp
index a58c8431e61548b8fdd2fb884952d924908d2786..9460011db0d7f1a687d4faafa513eef7eeee9c0c 100644
(file)
--- a/
db-oracle/oracle-sql.lisp
+++ b/
db-oracle/oracle-sql.lisp
@@
-514,7
+514,7
@@
the length of that format.")
(oci-stmt-prepare (deref-vp stmthp)
(deref-vp errhp)
c-stmt-string
- (
length sql
-stmt-string)
+ (
uffi:foreign-string-length c
-stmt-string)
+oci-ntv-syntax+ +oci-default+ :database db)
(oci-attr-get (deref-vp stmthp)
+oci-htype-stmt+