2003-12-31 10:40:26 -05:00
|
|
|
(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
|
|
|
|
|
2004-01-08 02:47:22 -05:00
|
|
|
make-integer-constant
|
|
|
|
make-string-constant
|
|
|
|
|
2003-12-31 10:40:26 -05:00
|
|
|
make-constant-from-c-name
|
|
|
|
make-constant-from-c-name-integer
|
2004-01-08 02:47:22 -05:00
|
|
|
|
2003-12-31 10:40:26 -05:00
|
|
|
generate-c-declarations
|
2004-02-11 07:44:36 -05:00
|
|
|
generate-c-define-exported-bindings-function
|
2003-12-31 10:40:26 -05:00
|
|
|
generate-c-enter-values-function
|
|
|
|
generate-c-gc-protect-globals-function
|
|
|
|
|
2004-01-08 02:47:22 -05:00
|
|
|
generate-binding
|
2003-12-31 10:40:26 -05:00
|
|
|
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))
|