(uffi:string-to-octets "abc")
#(97 98 99))
-;; Below is UTF-8 encoded, 27 octets / 20 lisp characters
(deftest :i18n/sto/4
+ (uffi:string-to-octets "abc" :null-terminate t)
+ #(97 98 99 0))
+
+;; Below is UTF-8 encoded, 27 octets / 20 lisp characters
+(deftest :i18n/sto/5
(uffi:string-to-octets "Iñtërnâtiônàlizætiøn" :encoding :utf-8)
#(73 195 177 116 195 171 114 110 195 162 116 105 195 180 110 195 160 108 105 122 195 166 116 105 195 184 110))
-(deftest :i18n/sto/5
+(deftest :i18n/sto/6
+ (uffi:string-to-octets "Iñtërnâtiônàlizætiøn" :encoding :utf-8 :null-terminate t)
+ #(73 195 177 116 195 171 114 110 195 162 116 105 195 180 110 195 160 108 105 122 195 166 116 105 195 184 110 0))
+
+(deftest :i18n/lsto/1
(length (uffi:string-to-octets "Iñtërnâtiônàlizætiøn" :encoding :utf-8))
27)
+(deftest :i18n/lsto/2
+ (length (uffi:string-to-octets "Iñtërnâtiônàlizætiøn" :encoding :utf-8 :null-terminate t))
+ 28)
+
(deftest :i18n/feoc/1
(uffi:foreign-encoded-octet-count "")
0)