1
0
mirror of synced 2026-01-12 00:42:56 +00:00
Interlisp.medley/obsolete/sources/LOADFULLFROMDLINITSLOW.CM
2021-04-28 18:07:23 -07:00

1 line
809 B
Plaintext

// IF YOU EDIT THIS FILE, BE SURE TO EDIT LOADFULLFROMDLINIT.CM
// LoadFullFromDLInitSlow.cm, edited 8-Mar-87 15:40:50 vanMelle
// ^^^ READ ^^^ UPDATE ^^^ READ ^^^ UPDATE ^^^ READ ^^^ UPDATE
// bring over files necessary to run INIT.DLINIT.
FTP/-E ERIS Directory/C LispCore>Next Ret/<>A Lisp.run DoradoLispMc.eb;
// start up DLInit. MAKESYSNAME gets set here. The (SPECVARS . T) is because some file in the loadup (unknown) sets it wrong
Lisp [ERIS]<LispCore>Next>Init.dlinit ;"
(SETQQ MAKESYSNAME LISPCORE)
(PROGN (LOAD (QUOTE {ERIS}<LISPCORE>SOURCES>LOADUP.LISP))(HARDRESET))
SHH(PROGN (IL:ENDLOADUP) (IL:SPECVARS . T) (IL:* IL:MAKESYS '{ERIS}<LISPCORE>NEXT>LISP.SYSOUT))
SHH(PROGN (IL:LOAD '{ERIS}<LISPCORE>SOURCES>LOADFULL.LISP) (IL:MAKESYS '{ERIS}<LISPCORE>NEXT>FULL.SYSOUT) (IL:LOGOUT T))
"