github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-05-04 15:16:32 +00:00
Code Issues Releases Wiki Activity

Install STINK 121T as MUDSYS;TS STINK, and use it.

Browse Source 
This replaces the existing MUDSYS;STINK 2 that was installed as TS
STINKM. The bad-EXPUNGE patch in there is no longer needed now Muddle is
built with MIDAS 73.
This commit is contained in:
Adam Sampson
2020-08-30 23:02:45 +01:00
committed by Adam Sampson
parent 7c28bc7571
commit 5ed3534528
3 changed files with 3 additions and 3430 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
build/muddle.tcl
View File

@@ -1,7 +1,7 @@
log_progress "ENTERING BUILD SCRIPT: MUDDLE" log_progress "ENTERING BUILD SCRIPT: MUDDLE"
respond "*" ":cwd mudsys\r" respond "*" ":cwd mudsys\r"
respond "*" ":midas ts stinkm_stink\r" respond "*" ":midas ts stink_sysen2;stink 121t\r"
expect ":KILL" expect ":KILL"
respond "*" ":xfile assem xfile\r" respond "*" ":xfile assem xfile\r"
@@ -9,7 +9,7 @@ expect -timeout 300 "Assembly done!"
mkdir "mudsav" mkdir "mudsav"
respond "*" ":stinkm\r" respond "*" ":mudsys;stink\r"
respond "STINK." "MMUD56 STINK\033@\033\033" respond "STINK." "MMUD56 STINK\033@\033\033"
expect "SETPUR" expect "SETPUR"
respond "\n" "D\033\033" respond "\n" "D\033\033"

2
src/mudsys/assem.xfile
View File

@@ -35,7 +35,7 @@
:midas;73 INITM :midas;73 INITM
: :
To link and initialize: To link and initialize:
:stinkm :mudsys;stink
MMUD56 STINK$@$$ (must be uppercase) MMUD56 STINK$@$$ (must be uppercase)
D$$ (must be uppercase) D$$ (must be uppercase)
strng/$1"56^?^?^?$ (type ^? as ^ then ?) strng/$1"56^?^?^?$ (type ^? as ^ then ?)

3427
src/mudsys/stink.2
View File

File diff suppressed because it is too large Load Diff