//////////////////////////////////////////////////////////////////////////
//
//			L O A D F U L L F R O M D L I N I T . C M
//
//	(C) Copyright 1990, Venue & Fuji Xerox, Ltd.
//	    All Rights Reserved.
//
//	Make the INIT.DLINIT into a LISP.SYSOUT & a FULL.SYSOUT.
//
//////////////////////////////////////////////////////////////////////////
// IF YOU EDIT THIS FILE, BE SURE TO EDIT LOADFULLFROMDLINITSLOW.CM

// LoadFullFromDLInit.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 ERINYES 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 {DSK6}Init.DLInit ;"
(SETQQ MAKESYSNAME LISPCORE)
(PROGN (LOAD (QUOTE \"{Pele:MV:Envos}<LISPCORE>SOURCES>LOADUP.LISP\")) (HARDRESET))
SHH(PROGN (IL:ENDLOADUP) (IL:SPECVARS . T) (IL:MAKESYS '\"{Pele:MV:Envos}<LISPCORE>Basics>LISP.SYSOUT\"))
SHH(PROGN (IL:LOAD '\"{Pele:MV:Envos}<LISPCORE>SOURCES>LOADFULL.LISP\") (IL:MAKESYS '\"{Pele:MV:Envos}<LISPCORE>Basics>FULL.SYSOUT\") (IL:LOGOUT T))


"