Function

Summary

Produces a single, concatenated fasl from a defsystem system or systems.

Package

lispworks

Signature

concatenate-system output system &key force simulate sim source-only args target-directory t-dir script-p => result

system ::= system-name *

Arguments

output

The name of the required concatenated fasl.

system-name

The name of a system defined using defsystem.

simulate

Verbosity conditions, see Description for more detail.

sim

Same as simulate .

force

If t , then all files in the system will be concatenated.

source-only

If t , the source files of the system are concatenated.

target-directory

The directory to search for the object files.

t-dir

Same as target-directory .

Values

result

A list containing the name or names of the concatenated systems.

Description

This function produces a single, concatenated fasl, output-file , from a list of individual systems (named amongst the args ).

Since concatenated fasl files may be produced in this way, you do not need to be wary of MS filename conventions if developing sources on UNIX for a Microsoft Windows application. This clearly allows more freedom for naming source files. However, output-file must, in such cases, be a MS-Window-compatible filename.

If simulate is nil or is not present, concatenate-system will work silently. Otherwise, a plan of the actions which concatenate-system intends to carry out is printed. What happens next depends upon the value of simulate :

• If it is t , the function does nothing.
• If :ask , then the user is asked, using y-or-n-p , if the plan should be carried out.
• If it is :each , the user is asked at each stage in the plan if the current action should be carried out. The responses y and n work as normal. If e is typed, concatenate-system exits without further processing.

If source-only is t , files will be loaded only if they are sources.

If, when searching target-directory for an object file, the file cannot be found, the appropriate source file from the system's default directory will be loaded instead.

See also

compile-system
defsystem
load-system