1
0
mirror of synced 2026-01-13 15:37:38 +00:00
Interlisp.medley/sources/LOADUP-LISP.CM
2023-08-01 12:08:55 -07:00

1 line
382 B
Plaintext

"
(PROGN
(LOAD(CONCAT(QUOTE {DSK})(UNIX-GETENV(QUOTE MEDLEYDIR))(QUOTE /sources/LOADUP-LISP.LCOM)))
(LOADUP-LISP(CONCAT(QUOTE {DSK})(UNIX-GETENV(QUOTE LOADUP_WORKDIR))(QUOTE /lisp.dribble)))
(HARDRESET)
)
SHH
(PROGN
(IL:ENDLOADUP)':MEDLEY)
(IL:MAKESYS (IL:CONCAT (QUOTE {DSK})(IL:UNIX-GETENV(QUOTE LOADUP_WORKDIR))(IL:L-CASE (QUOTE /lisp.sysout)))))
(IL:LOGOUT T)
)
"