Artifact 5af5bcdea03b50068c70395bd0de87f283756e6c16a9b37eca9e4446eb804d52:

• File psl-1983/20-kernel/make-psl.ctl — 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: 797) [annotate] [blame] [check-ins using] [more...]

@; This file constructs a new PSL containing many useful things, including:
@;
@;	The NMODE (EMACS-like) editor and Lisp interface.
@;	The Lisp Machine Defstruct Facility.
@;	A set of "useful" things described in the manual.
@;
@; It creates a new executable file S:PSL.EXE, first deleting any previous
@; versions and expunging.  When approved, this file should be renamed to
@; PSL:PSL.EXE.
@;
@delete s:psl.exe
@expunge s:
@psl:bare-psl random-argument-to-get-a-new-fork
*(load useful nstruct debug find nmode init-file)
*(nmode-initialize)
*(nmode-switch-windows) % Switch to "OUTPUT" window
*(set-message 
*"C-] E executes Lisp form on current line; C-] L gets normal PSL interface")
*(savesystem "PSL 3.1" "s:psl.exe" '((read-init-file "psl")))
*(quit)
@reset .
@set file autokeep s:psl.exe