map-system

$Revision: 5.0.2.4 $

Generic Function

Package: EXCL

Arguments: (system fun &key silent simulate include-components module-keys

This generic function maps function over each module-group in system. fun should be a function that takes one argument which will be a module-group. The default method returns nil, but is called for its side effects.

The value of the silent keyword argument can be t or nil. Its default value is nil. t means do not print anything while performing the operation. A non-nil value of simulate overrides silent t. If the value of this keyword argument is t, then the functionality is similar to make -s.

The value of the simulate keyword argument can be t or nil. t means print the list of actions that would be taken if the operations were to be performed at this time, but do not actually perform the operations. If the value of this keyword argument is t, then the functionality is similar make -n.

The value of the include-components keyword argument can be t or nil. The default value is t, which means perform a map-system operation on all component systems of system. A value of nil means ignore component systems.

The value of the module-keys keyword should be a list of keywords and arguments to be passed as a keyword list to the map-module-action method for each module-group.

In this example, we pretty print each module in a system.

USER(9): (defsystem :my-serial-sys () (:serial "my1" "my2")) :MY-SERIAL-SYS USER(10): (map-system :my-serial-sys #'(lambda (module) (pprint module))) #<DEFSYSTEM:LISP-MODULE "my1" @ #x68c9a6> #<DEFSYSTEM:LISP-MODULE "my2" @ #x69197e> NIL USER(11): nil

See defsystem.htm for general information on the defsystem facility.

The general documentation description is in introduction.htm. The index is in index.htm.