map-system

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 true 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 to 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):

Although the home package of the symbol naimg this operator is the excl package, it is also exported from the defsystem package.

See also defsystem.htm for general information on the defsystem facility in Allegro CL.

Copyright (c) 1998-2016, Franz Inc. Oakland, CA., USA. All rights reserved.
This page was not revised from the 8.1 page.
Created 2010.1.21.