4.6 Structure Type Transformer Binding
The define-struct form binds the name of a structure type as a transformer binding that records the other identifiers bound to the structure type, the constructor procedure, the predicate procedure, and the field accessor and mutator procedures. This information can be used during the expansion of other expressions via syntax-local-value.
For example, the define-struct variant for subtypes uses the base type name t to find the variable struct:t containing the base type’s descriptor; it also folds the field accessor and mutator information for the base type into the information for the subtype. As another example, the match form uses a type name to find the predicates and field accessors for the structure type. The struct form in an imported signature for unit causes the unit transformer to generate information about imported structure types, so that match and subtyping define-struct forms work within the unit.
The expansion-time information for a structure type is represented either as a structure that encapsulates a procedure that takes no arguments and returns a list of six element, or it can be represented directly as a list of six elements (of the same sort that the encapsulated procedure must return):
an identifier that is bound to the structure type’s descriptor, or #f it none is known;
an identifier that is bound to the structure type’s constructor, or #f it none is known;
an identifier that is bound to the structure type’s predicate, or #f it none is known;
a list of identifiers bound to the field accessors of the structure type, optionally with #f as the list’s last element. A #f as the last element indicates that the structure type may have additional fields, otherwise the list is a reliable indicator of the number of fields in the structure type. Furthermore, the accessors are listed in reverse order for the corresponding constructor arguments. (The reverse order enables sharing in the lists for a subtype and its base type.)
a list of identifiers bound to the field mutators of the structure type, or #f for each field that has no known mutator, and optionally with an extra #f as the list’s last element (if the accessor list has such a #f). The list’s order and the meaning of a final #f are the same as for the accessor identifiers, and the length of the mutator list is the same as the accessor list’s length.
an identifier that determines a super-type for the structure type, #f if the super-type (if any) is unknown, or #t if there is no super-type. If a super-type is specified, the identifier is also bound to structure-type expansion-time information.
Use struct-info? to recognize both forms of information, and use extract-struct-info to obtain a list from either representation. Use make-struct-info to encapsulate a procedure that represents structure type information.
The implementor of a syntactic form can expect users of the form to know what kind of information is available about a structure type. For example, the match implementation works with structure information containing an incomplete set of accessor bindings, because the user is assumed to know what information is available in the context of the match expression. In particular, the match expression can appear in a unit form with an imported structure type, in which case the user is expected to know the set of fields that are listed in the signature for the structure type.
The bindings documented in this section are provided by the scheme/struct-info library, not scheme/base or scheme.
(struct-info? v) → boolean? |
v : any/c |
Returns #t if v is either a six-element list with the correct shape for representing structure-type information, or a procedure encapsulated by make-struct-info.
(checked-struct-info? v) → boolean? |
v : any/c |
Returns #t if v is a procedure encapsulated by make-struct-info and produced by define-struct, but only when no parent type is specified or the parent type is also specified through a transformer binding to such a value).
(make-struct-info thunk) → struct-info? |
thunk : (-> (and/c struct-info? list?)) |
Encapsulates a thunk that returns structure-type information in list form.
(extract-struct-info v) → (and/c struct-info? list?) |
v : struct-info? |
Extracts the list form of the structure type information represented by v.
The structure type descriptor for the structure type returned by make-struct-info. This structure type descriptor is mostly useful for creating structure subtypes. The structure type includes a guard that checks an instance’s first field in the same way as make-struct-info.