12345678910111213141516171819202122 |
- @delete s:ex-dec20-cross.exe,
- exp
- @get psl:ex-rlisp
- @st
- *Options!*:=NIL
- *load(zboot, syslisp, if!-system, lap!-to!-asm)
- *load(dec20!-comp,dec20!-asm)
- *load(dec20!-cmac)
- *remflag(''(extrareg),''terminaloperand)
- *off usermode
- *% This patch is until init files can be read
- *%CopyD(''SaveUncompiledExpression, ''SaveForCompilation)
- *%in "DEC20-PATCHES.sl"$
- *in "pt:new-sym.red"$
- *cross!-compiler!-name := "S:EX-DEC20-CROSS.EXE"
- *Date!* := "Extended Dec 20 cross compiler"
- *writesavefile()
- *Quit
- @reset .
|