On this page:
inspector?
make-inspector
make-sibling-inspector
current-inspector
struct-info
struct-type-info
struct-type-make-constructor
struct-type-make-predicate
object-name

13.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 define-struct form (see Defining Structure Types: struct), or through an optional inspector argument to make-struct-type.

procedure

(inspector? v)  boolean?

  v : any/c
Returns #t if v is an inspector, #f otherwise.

procedure

(make-inspector [inspector])  inspector?

  inspector : inspector? = (current-inspector)
Returns a new inspector that is a subinspector of inspector. Any structure type controlled by the new inspector is also controlled by its ancestor inspectors, but no other inspectors.

procedure

(make-sibling-inspector [inspector])  inspector?

  inspector : inspector? = (current-inspector)
Returns a new inspector that is a subinspector of the same inspector as inspector. That is, inspector and the result inspector control mutually disjoint sets of structure types.

parameter

(current-inspector)  inspector?

(current-inspector insp)  void?
  insp : inspector?
A parameter that determines the default inspector for newly created structure types.

procedure

(struct-info v)  
(or/c struct-type? #f) boolean?
  v : any/c
Returns two values:

Returns eight values that provide information about the structure type descriptor struct-type, assuming that the type is controlled by the current inspector:

If the type for struct-type is not controlled by the current inspector, the exn:fail:contract exception is raised.

procedure

(struct-type-make-constructor struct-type)

  struct-constructor-procedure?
  struct-type : struct-type?
Returns a constructor procedure to create instances of the type for struct-type. If the type for struct-type is not controlled by the current inspector, the exn:fail:contract exception is raised.

procedure

(struct-type-make-predicate struct-type)  any

  struct-type : any/c
Returns a predicate procedure to recognize instances of the type for struct-type. If the type for struct-type is not controlled by the current inspector, the exn:fail:contract exception is raised.

procedure

(object-name v)  any

  v : any/c
Returns a value for the name of v if v has a name, #f otherwise. The argument v can be any value, but only (some) procedures, structures, structure types, structure type properties, regexp values, and ports have names. See also Inferred Value Names.

The name (if any) of a procedure is always a symbol. The procedure-rename function creates a procedure with a specific name.

The name of a structure, structure type, structure type property is always a symbol. 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).