Function | Package: excl | ToC | DocOverview | CGDoc | RelNotes | FAQ | Index | PermutedIndex
| Allegro CL version 10.1 Unrevised from 10.0 to 10.1. 10.0 version

## find-system

Arguments: system-name &optional errorp

This function returns the system object associated with the name system-name.

If errorp is supplied and is `t`, then an error is signalled if no system named system-name exists. If errorp is not supplied or is `nil`, then `nil` is returned if no system named system-name exists.

    USER(18): (defsystem :my-serial-sys ()

    (:serial "my1" "my2"))
    MY-SERIAL-SYS
    USER(19): (find-system :my-serial-sys)
    #<DEFSYSTEM:DEFAULT-SYSTEM "MY-SERIAL-SYS" @ #x6b5b4e>
    USER(20):

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

Copyright (c) 1998-2022, Franz Inc. Lafayette, CA., USA. All rights reserved.
This page was not revised from the 10.0 page.
Created 2019.8.20.

|  | ToC | DocOverview | CGDoc | RelNotes | FAQ | Index | PermutedIndex
| Allegro CL version 10.1 Unrevised from 10.0 to 10.1. 10.0 version