14.9 Structure Inspectors
An inspector provides access to structure fields and structure type information without the normal field accessors and mutators. (Inspectors are also used to control access to module bindings; see Code Inspectors.) Inspectors are primarily intended for use by debuggers.
When a structure type is created, an inspector can be supplied. The given inspector is not the one that will control the new structure type; instead, the given inspector’s parent will control the type. By using the parent of the given inspector, the structure type remains opaque to “peer” code that cannot access the parent inspector.
The current-inspector parameter determines a default inspector argument for new structure types. An alternate inspector can be provided though the #:inspector option of the struct form (see Defining Structure Types: struct), or through an optional inspector argument to make-struct-type.
procedure
(inspector? v) → boolean?
v : any/c
procedure
(make-inspector [inspector]) → inspector?
inspector : inspector? = (current-inspector)
procedure
(make-sibling-inspector [inspector]) → inspector?
inspector : inspector? = (current-inspector)
procedure
(inspector-superior? inspector maybe-subinspector) → boolean? inspector : inspector? maybe-subinspector : inspector?
Added in version 6.5.0.6 of package base.
parameter
(current-inspector insp) → void? insp : inspector?
procedure
(struct-info v) →
(or/c struct-type? #f) boolean? v : any/c
struct-type: a structure type descriptor or #f; the result is a structure type descriptor of the most specific type for which v is an instance, and for which the current inspector has control, or the result is #f if the current inspector does not control any structure type for which the struct is an instance.
skipped?: #f if the first result corresponds to the most specific structure type of v, #t otherwise.
procedure
(struct-type-info struct-type)
→
symbol? exact-nonnegative-integer? exact-nonnegative-integer? struct-accessor-procedure? struct-mutator-procedure? (listof exact-nonnegative-integer?) (or/c struct-type? #f) boolean? struct-type : struct-type?
name: the structure type’s name as a symbol;
init-field-cnt: the number of fields defined by the structure type provided to the constructor procedure (not counting fields created by its ancestor types);
auto-field-cnt: the number of fields defined by the structure type without a counterpart in the constructor procedure (not counting fields created by its ancestor types);
accessor-proc: an accessor procedure for the structure type, like the one returned by make-struct-type;
mutator-proc: a mutator procedure for the structure type, like the one returned by make-struct-type;
immutable-k-list: an immutable list of exact non-negative integers that correspond to immutable fields for the structure type;
super-type: a structure type descriptor for the most specific ancestor of the type that is controlled by the current inspector, or #f if no ancestor is controlled by the current inspector;
skipped?: #f if the seventh result is the most specific ancestor type or if the type has no supertype, #t otherwise.
If the type for struct-type is not controlled by the current inspector, the exn:fail:contract exception is raised.
procedure
(struct-type-sealed? struct-type) → boolean?
struct-type : struct-type?
Added in version 8.0.0.7 of package base.
procedure
(struct-type-authentic? struct-type) → boolean?
struct-type : struct-type?
Added in version 8.0.0.7 of package base.
procedure
(struct-type-make-constructor struct-type [ constructor-name]) → struct-constructor-procedure? struct-type : struct-type? constructor-name : (or/c symbol? #f) = #f
procedure
(struct-type-make-predicate struct-type) → any
struct-type : any/c
procedure
(object-name v) → any
v : any/c
The name (if any) of a procedure is always a symbol. The procedure-rename function creates a procedure with a specific name.
If a structure’s type implements the prop:object-name property, and the value of the prop:object-name property is an integer, then the corresponding field of the structure is the name of the structure. Otherwise, the property value must be a procedure, which is called with the structure as argument, and the result is the name of the structure. If a structure is a procedure as implemented by one of its fields (i.e., the prop:procedure property value for the structure’s type is an integer), then its name is the implementing procedure’s name. Otherwise, its name matches the name of the structure type that it instantiates.
The name of a regexp value is a string or byte string. Passing the string or byte string to regexp, byte-regexp, pregexp, or byte-pregexp (depending on the kind of regexp whose name was extracted) produces a value that matches the same inputs.
The name of a port can be any value, but many tools use a path or string name as the port’s for (to report source locations, for example).
The name of a logger is either a symbol or #f.
The name of a prompt tag is either the optional symbol given to make-continuation-prompt-tag or #f.
Changed in version 7.9.0.13 of package base: Recognize the name of continuation prompt tags.
A procedure proc of one argument: In this case, procedure proc receives the structure as an argument, and the result of proc is the object-name of the structure.
An exact, non-negative integer between 0 (inclusive) and the number of non-automatic fields in the structure type (exclusive, not counting supertype fields): The integer identifies a field in the structure, and the field must be designated as immutable. The value of the field is used as the object-name of the structure.
Added in version 6.2 of package base.