From e73dd4b4af2e8689ccc4a0469702a11785fa9f26 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 19 Dec 2008 23:59:33 +0000 Subject: [PATCH] add FFI types _string/utf-16/null and _string/ucs-4/null svn: r12911 original commit: 7dc56df9499127695e4fc09d754bdd4cdd411fa5 --- collects/mzlib/foreign.ss | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/collects/mzlib/foreign.ss b/collects/mzlib/foreign.ss index fa2520d..a945f09 100644 --- a/collects/mzlib/foreign.ss +++ b/collects/mzlib/foreign.ss @@ -680,8 +680,9 @@ ;; String types ;; The internal _string type uses the native ucs-4 encoding, also providing a -;; utf-16 type (note: these do not use #f as NULL). -(provide _string/ucs-4 _string/utf-16) +;; utf-16 type (note: the non-/null variants do not use #f as NULL). +(provide _string/ucs-4 _string/utf-16 + _string/ucs-4/null _string/utf-16/null) ;; 8-bit string encodings, #f is NULL (define ((false-or-op op) x) (and x (op x)))