Variable

Summary

Defines the LispWorks listener prompt.

Package

lispworks

Initial value

"~%~A ~D~[~:;~:* : ~D~] > "

Description

The variable *prompt* defines the LispWorks listener prompt. Its value can be a:

Function designator

A function of zero arguments which should return the prompt as a string.

String

A format string with processing three arguments: the current package name, the next history number, and the debug level.

A form

The form is passed to eval and should return a format string, which is used as for the string case above.

Example

CL-USER 1 > (defvar *default-prompt* *prompt*)

*DEFAULT-PROMPT*

CL-USER 2 > (progn

              (setf *prompt* 

                    '(string-append "~&" 

                                    (sys:get-user-name)

                                    #\Space

                                    (subseq *default-prompt* 2)))

              nil)

NIL

dubya CL-USER 3 >