added the types clock_t and ssize_t, both fixnum

This commit is contained in:
marting 1999-10-08 17:59:55 +00:00
parent adbee59277
commit dbbdce2254
1 changed files with 5 additions and 0 deletions

View File

@ -167,6 +167,8 @@
;; extensions by JMG for the new FFI
(time_t #("time_t ~a" integer? "s48_extract_integer" #f))
(clock_t #("clock_t ~a" integer? "s48_extract_fixnum" #f))
(ssize_t #("ssize_t ~a" integer? "s48_extract_fixnum" #f))
(desc #("s48_value ~a" #f "" #f))
(string-desc #("s48_value ~a" string? "" #f))
@ -218,6 +220,9 @@
; Extension by JMG with the new FFI
(time_t #("time_t ~a" "s48_enter_integer" #f #f #f))
(clock_t #("clock_t ~a" "s48_enter_fixnum" #f #f #f))
(ssize_t #("ssize_t ~a" "s48_enter_fixnum" #f #f #f))
(desc #("s48_value ~a" "" #f #f #f))
(string-desc #("s48_value ~a" "" #f #f #f))