Add documents from envos/LISPCORE/internal/docs (#812)
This commit is contained in:
99
docs/internal/MakeLispFloppies.doc
Normal file
99
docs/internal/MakeLispFloppies.doc
Normal file
@@ -0,0 +1,99 @@
|
||||
-- MakeLispFloppies.doc
|
||||
-- Last edit 11-Oct-84 16:27:50 by Masinter
|
||||
-- Instructions for building Floppies for installing Interlisp-D on 1108s
|
||||
|
||||
-- Follow these instructions if running in Mesa 11.1 Tajo or Copilot.
|
||||
-- To execute these commands, make sure the insertion point is in the
|
||||
-- Executive window (by clicking left mouse button in Executive window).
|
||||
-- Then, while holding the "Copy" key down, select the command you want to
|
||||
-- execute (including the "return" at the end of line.) When you let up on
|
||||
-- Copy, the command will be "unread" the Executive input buffer.
|
||||
-- Before you transfer files, you should have approximate 6000 pages
|
||||
-- in your volume to contain all the files.
|
||||
|
||||
-- If you want to keep the files separate, you can work on separate directory
|
||||
-- to keep files in one place.
|
||||
|
||||
Create FloppyFiles -- creates a new directory
|
||||
|
||||
push FloppyFiles -- puts the directory on your search path (like Connect)
|
||||
|
||||
-- bring over tool for making floppies.
|
||||
-- Change "Iris" to to the name of the server has Mesa closest to you (Phylum and Rose are candidates)
|
||||
|
||||
ftp Iris directory/c Mesa>11.0 retrieve/a<> MakeDLionBootFloppyTool.bcd FloppyInitial.db Mesa.db MoonBoot.db DLion.germ
|
||||
|
||||
-- get Lisp specific files:
|
||||
|
||||
ftp Eris directory/c Lisp>Harmony>Mesa ret/<>A HelloDLion.boot directory/c Lisp>Harmony>CM retrieve/<>A GetHello.othello GetLisp.othello PartitionLisp.othello PartitionLispTajo.othello PartitionLispStarTajo.othello
|
||||
|
||||
-- now start up tool. Execute:
|
||||
|
||||
MakeDLionBootFloppyTool.bcd
|
||||
|
||||
-- Insert new floppy
|
||||
-- Make the following settings in MakeDLionBootFloppyTool:
|
||||
|
||||
-- Drive: 0 -- default is correct --
|
||||
-- Floppy Name: LispOthello -- *** CHANGE THIS ONE *** --
|
||||
-- Initial uCode: FloppyInitial.db -- default is correct --
|
||||
-- Diagnostic uCode: MoonBoot.db -- default is correct --
|
||||
-- Pilot uCode: Mesa.db -- default is correct --
|
||||
-- Germ File: DLion.germ -- default is correct --
|
||||
-- Boot File: HelloDLion.boot -- *** CHANGE THIS ONE *** --
|
||||
|
||||
-- Turn on all three options (Format Floppy, Reserve Last Cylinder For Diagnostics, Install Boot Files) and button Start!
|
||||
|
||||
-- Now execute the following WITHOUT REMOVING FLOPPY:
|
||||
|
||||
floppy write Lisp11SAx000Initial.db DLion.germ Mesa.db HelloDLion.boot getLisp.othello PartitionLisp.othello PartitionLispTajo.othello PartitionLispStarTajo.othello
|
||||
floppy info list/v
|
||||
|
||||
----------------------------------------------------
|
||||
-- You have now made a "LispOthello" diskette
|
||||
----------------------------------------------------
|
||||
-- To make a floppy with a SYSOUT on it, generally you should use Lisp:
|
||||
-- COPYFILE of a file to floppy (after FLOPPY.MODE(SYSOUT)) or SYSOUT({FLOPPY})
|
||||
-- work. However, you can also do this from Tajo:
|
||||
|
||||
ftp Eris directory/c Lisp>Harmony>Basics ret/A<> Lisp.SYSOUT
|
||||
|
||||
-- Insert a new floppy, then do the following. The "--y" is so that if it asks you if you want to overwrite, it will get a "Yes" response after complaining about the "--", but if it doesn't ask, the "--y" will get ignored.
|
||||
|
||||
floppy format "Lisp Sysout '#1"/n
|
||||
-- y
|
||||
floppy write lisp.sysout[0..2249]/s lisp.sysout
|
||||
floppy info list/v
|
||||
|
||||
-- Insert a new floppy, and then
|
||||
|
||||
floppy format "Lisp Sysout '#2"/n
|
||||
-- y
|
||||
floppy write lisp.sysout[2250..4499]/s lisp.sysout
|
||||
floppy info list/v
|
||||
|
||||
-- If SYSOUT>4499 pages, insert a new floppy, and then:
|
||||
|
||||
floppy format "Lisp Sysout '#3"/n
|
||||
-- y
|
||||
floppy write lisp.sysout[4500..6749]/s lisp.sysout
|
||||
floppy info list/v
|
||||
|
||||
-- If SYSOUT>6749 pages, insert a new floppy, and then:
|
||||
|
||||
floppy format "Lisp Sysout '#4"/n 3/f
|
||||
-- y
|
||||
floppy write lisp.sysout[6750..8999]/s lisp.sysout
|
||||
floppy info list/v
|
||||
|
||||
floppy format "Lisp Sysout '#5"/n 3/f
|
||||
-- y
|
||||
floppy write lisp.sysout[9000..11499]/s lisp.sysout
|
||||
floppy info list/v
|
||||
|
||||
-- done (extend for sysouts bigger than 11500 pages). If any changes to files were made, back up:
|
||||
|
||||
|
||||
-- stop working in the "FloppyFiles" subdirectory
|
||||
|
||||
pop
|
||||
Reference in New Issue
Block a user