github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-28 21:01:16 +00:00
Code Issues Releases Wiki Activity

Microcode for the TT2500.

Browse Source 
The assembler will recieve a GC-OVERFLOW interrupt.  Other TT2500
files set the GC-OVERFLOW variable to a dummy function, which seems to
appease the interrupt.

Since the TVDIS code was written before backquote was introduced to
Maclisp, it uses comma characters without quoting.  To accomodate this
a call to SETSYNTAX overrides the new syntax for comma.
This commit is contained in:
Lars Brinkhoff
2021-01-14 12:10:27 +01:00
parent 4af63f786b
commit 3255fc5188
4 changed files with 1285 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
build/lisp.tcl
View File

@@ -846,6 +846,19 @@ respond "_" "2500;zap\r"
respond "_" "\032"
type ":kill\r"
# 2500 microcode
respond "*" ":cwd minsky\r"
respond "*" "lisp\013"
respond "Alloc?" "n\r"
respond "*" "(setq gc-overflow '(lambda (x) t))"
respond "T)" "(setsyntax '/, 'a '/,)"
respond "T" "(load \"minsky;tvdis\")"
respond "T" "(load \"2500;zap\")"
respond_load "(array im fixnum 4096)"
respond "IM" "(zap tvdis)"
respond "FINISH)" "(quit)"
expect ":KILL"
# TEACH;TS XLISP
respond "*" ":complr\r"

1
build/timestamps.txt
View File

@@ -1337,6 +1337,7 @@ midas/midas.bugs 198706130710.45
midas/-read-.-this- 197603220513.44
midas/xjsys.5 197809290102.22
minits/-how-t.21 198606232322.38
minsky/tvdis.3 197602270042.17
mits_s/3com.3 198302161308.38
mits_s/boot11.1 198207030003.01
mits_s/camac.1 198207030003.37