Defines the LispWorks listener prompt.
lispworks
"~%~A ~D~[~:;~:* : ~D~] > "
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. |
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 >
LispWorks® User Guide and Reference Manual - 18 Feb 2025 15:32:27