alex-eg
2b73fcf1c4
An arglist entry, an array's bound and its element type ask one question, and disagreed: `(unsigned int)' was a name plus a type, a trailing typedef a bound, a subscript the type's second word.
29 lines
439 B
Scheme
29 lines
439 B
Scheme
(module types
|
|
(add-struct
|
|
add-union
|
|
add-enum
|
|
add-typedef
|
|
add-define
|
|
|
|
type-match
|
|
type-pattern-matches?
|
|
map-fields
|
|
|
|
add-name-type!
|
|
get-name-type
|
|
type-of
|
|
current-type-of
|
|
get-return-type
|
|
|
|
get-type-info
|
|
get-tag-info
|
|
get-fields
|
|
get-underlying-type
|
|
|
|
type-head?
|
|
named-arg?
|
|
typedef-name?
|
|
array-bound?
|
|
array-element-type)
|
|
"../types.scm")
|