From: Dmitry Bogatov <kact...@gnu.org> --- module/system/foreign/declarative.scm | 4 ++++ 1 file changed, 4 insertions(+)
diff --git a/module/system/foreign/declarative.scm b/module/system/foreign/declarative.scm index 62d40b8..596cce0 100644 --- a/module/system/foreign/declarative.scm +++ b/module/system/foreign/declarative.scm @@ -107,6 +107,10 @@ (mirror-primitive-type float <?> real?) (mirror-primitive-type double <?> real?) (mirror-primitive-type '* *: #:validate-proc pointer?) +(define-foreign-type string: + #:encode-proc string->pointer + #:decode-proc pointer->string + #:validate-proc string?) (define-record-type <foreign-argument> (%make-foreign-argument type) -- I may be not subscribed. Please, keep me in carbon copy.
