PG
Size: a a a
PG
PG
A
D
D
AR
D
D
AP
D
PG
D
D
header
он ругается: define-lib-func: unbound identifier
(define-syntax-rule (use lib)
(define-ffi-definer define-lib-func (ffi-lib lib)
#:default-make-fail (lambda (n)
(displayln (format "Cannot load ~a" n)))))
(define-syntax-rule (header hdr regex)
(map define-lib-func
(get-functions-from-header hdr (pregexp regex))))
A
D
D
D
(define-ffi-definer define-id ffi-lib-expr
option ...)
D
PG