projects
/
clsql.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3b0f3c9
)
Add changes for internationalized strings missed on last commit.
author
Kevin Rosenberg
<kevin@rosenberg.net>
Sun, 7 Feb 2010 03:22:27 +0000
(20:22 -0700)
committer
Kevin Rosenberg
<kevin@rosenberg.net>
Sun, 7 Feb 2010 03:22:27 +0000
(20:22 -0700)
uffi/clsql-uffi.lisp
patch
|
blob
|
history
diff --git
a/uffi/clsql-uffi.lisp
b/uffi/clsql-uffi.lisp
index e08c157432c1b8fb5feca9a860d0b938cdedda71..03ce0745359ea36f95816e783f22c114e2ad0167 100644
(file)
--- a/
uffi/clsql-uffi.lisp
+++ b/
uffi/clsql-uffi.lisp
@@
-141,10
+141,10
@@
(uffi:convert-from-foreign-usb8 char-ptr length)
(error "Can't return blob since length is not specified.")))
(t
(uffi:convert-from-foreign-usb8 char-ptr length)
(error "Can't return blob since length is not specified.")))
(t
- ;; sb-unicode
still broken with
converting with length, assume
+ ;; sb-unicode
doesn't work
converting with length, assume
;; that string is null terminated
#+sb-unicode
;; that string is null terminated
#+sb-unicode
- (uffi:convert-from-foreign-string char-ptr
:locale :none
)
+ (uffi:convert-from-foreign-string char-ptr)
#-sb-unicode
(if length
(uffi:convert-from-foreign-string char-ptr
#-sb-unicode
(if length
(uffi:convert-from-foreign-string char-ptr