6 lines
2.4 KiB
Plaintext
6 lines
2.4 KiB
Plaintext
SOURCELOOKUP
|
||
|
||
|
||
INTRODUCTION
|
||
|
||
This module provides a mechanism to locate the source file and floppy in which a particular system function is defined. It is designed for use with the set of Xerox LISP source files distributed on floppy with the Lyric release. This module uses the WHEREIS module distributed with Lisp Library documented in Section 23 of the Interlisp Reference Manual.
|
||
|
||
LOADING THE MODULE
|
||
|
||
SOURCELOOKUP requires WHEREIS.DCOM and HASH.DCOM to be loaded. The variable WHEREIS.HASH must be set to the hash file LYRICSOURCES.WHEREIS. All these files are distributed on the floppy labeled Lyric Sources #10. The hash file must reside on a random access device. To use the hash file on FLOPPY do the following:
|
||
|
||
(SETQ WHEREIS.HASH '({FLOPPY}LYRICSOURCES.WHEREIS))
|
||
|
||
The variable LyricSourceIndex will be set to a list where each element is a list whose CAR is the name of a Lyric Source floppy and CDR is the list of files contained on the floppy.
|
||
|
||
|
||
USER FUNCTION
|
||
|
||
|
||
(LOCATE.FUNCTION function)
|
||
|
||
If function is defined in a distributed source file prints out the appropriate file name and floppy and returns the file name; else prints "function not found" and returns NIL.
|
||
|
||
EXAMPLES
|
||
|
||
(LOCATE.FUNCTION 'SETQ)
|
||
The function SETQ is defined in the file LLINTERP located on floppy Lyric Source #5.
|
||
(LLINTERP)
|
||
|
||
(LOCATE.FUNCTION 'UNDEFINED)
|
||
UNDEFINED not found.
|
||
NIL
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|