28 lines
652 B
Scheme
28 lines
652 B
Scheme
|
(define-interface ffi-import-constants-interface
|
||
|
|
(export
|
||
|
|
make-constant
|
||
|
|
constant?
|
||
|
|
constant-type-int?
|
||
|
|
constant-type-char?
|
||
|
|
constant-type-string?
|
||
|
|
constant-c-name
|
||
|
|
constant-scheme-name
|
||
|
|
constant-c-value-name
|
||
|
|
constant-type
|
||
|
|
|
||
|
|
make-constant-from-c-name
|
||
|
|
make-constant-from-c-name-integer
|
||
|
|
|
||
|
|
generate-c-declarations
|
||
|
|
generate-c-enter-values-function
|
||
|
|
generate-c-gc-protect-globals-function
|
||
|
|
|
||
|
|
generate-finite-type-definition
|
||
|
|
make-drop-common-prefix-name-converter))
|
||
|
|
|
||
|
|
(define-structure ffi-import-constants ffi-import-constants-interface
|
||
|
|
(open
|
||
|
|
scheme signals
|
||
|
|
srfi-1 srfi-9 srfi-13 srfi-28)
|
||
|
|
(files ffi-tools))
|