Artifact 827c70bc8a24a18b466d51368bda1a164c88597421c750abd361d33234b6d880:
- File
psl-1983/20-kernel/20-kernel-gen.sl
— part of check-in
[eb17ceb7f6]
at
2020-04-21 19:40:01
on branch master
— Add Reduce 3.0 to the historical section of the archive, and some more
files relating to version sof PSL from the early 1980s. Thanks are due to
Paul McJones and Nelson Beebe for these, as well as to all the original
authors.git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/historical@5328 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 1392) [annotate] [blame] [check-ins using] [more...]
- File
psl-1983/lap/20-kernel-gen.sl
— part of check-in
[eb17ceb7f6]
at
2020-04-21 19:40:01
on branch master
— Add Reduce 3.0 to the historical section of the archive, and some more
files relating to version sof PSL from the early 1980s. Thanks are due to
Paul McJones and Nelson Beebe for these, as well as to all the original
authors.git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/historical@5328 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 1392) [annotate] [blame] [check-ins using]
% % 20-KERNEL-GEN.SL - Generate scripts for building Dec-20 PSL kernel % % Author: Eric Benson % Symbolic Computation Group % Computer Science Dept. % University of Utah % Date: 26 May 1982 % Copyright (c) 1982 University of Utah % % <PSL.20-INTERP>20-KERNEL-GEN.SL.15, 7-Jun-82 12:48:19, Edit by BENSON % Converted kernel-file-name* to all-kernel-script... % <PSL.20-INTERP>20-KERNEL-GEN.SL.14, 6-Jun-82 05:29:21, Edit by GRISS % Add kernel-file-name* (compiletime (load kernel)) (compiletime (setq *EOLInStringOK T)) (loadtime (imports '(kernel))) (setq command-file-name* "%w.ctl") (setq command-file-format* "define DSK: DSK:, P20:, PI: S:DEC20-CROSS.EXE ASMOut ""%w""; in ""%w.build""; ASMEnd; quit; compile %w.mac, d%w.mac delete %w.mac, d%w.mac ") (setq init-file-name* "psl.init") (setq init-file-format* "(lapin ""%w.init"") ") (setq all-kernel-script-name* "all-kernel.ctl") (setq all-kernel-script-format* "submit %w.ctl ") (setq code-object-file-name* "%w.rel") (setq data-object-file-name* "d%w.rel") (setq link-script-name* "psl-link.ctl") (setq link-script-format* "cd S: define DSK:, DSK:, P20: LINK /nosymbol nil.rel /set:.low.:202 %e /save s:bpsl.exe /go ") (setq script-file-name-separator* " ") (kernel '(types randm alloc arith debg error eval extra fasl io macro prop symbl sysio tloop main heap))