// LoadFullFromLisp.cm Edited 5-Sep-85 -- van Melle --

Copy Init.save _ Init.Lisp
Del INIT.LISP!*
FTP/-E ERIS Login/C Dir/C Lisp>koto>basics Ret/<>A Lisp.run DoradoLispMc.eb DolphinLispMc.eb Ret/S Init.nogreet Init.Lisp

Lisp [ERIS]<Lisp>KOTO>BASICS>Lisp.sysout ;"  
SHH(AND (INFILEP '{DSK}INIT.SAVE) (COPYFILE '{DSK}INIT.SAVE '{DSK}INIT.LISP;1) (DELFILE '{DSK}INIT.SAVE))
SHH(LOAD '{ERIS}<LISP>KOTO>CM>LOADFULL.LISP)
SHH(MAKESYS '{ERIS}<LISP>KOTO>BASICS>FULL.SYSOUT]
SHH(LOGOUT T] "