1
0
mirror of https://github.com/PDP-10/its.git synced 2026-03-03 10:22:59 +00:00

Change location of MDL 54 pure library to allow old Zork to run.

- Update MDL 54 interpreter to look in MUDSAV;SAV 54FILE and MUDSAV;FIXUP 54FILE
  for pure library.
- Update MKSVFL utility to create pure library in new location.
- Update muddle.tcl to run MKSVFL to create dummy pure library.
This commit is contained in:
Eric Swenson
2023-02-24 18:06:05 -08:00
committed by Lars Brinkhoff
parent de1bd31589
commit e56de6edc1
3 changed files with 10 additions and 8 deletions

View File

@@ -26,8 +26,10 @@ build_muddle "mudsys" "56"
# Generate SAV FILE and FIXUP FILE for Muddle pure code library
respond "*" ":midas mudsys; ts mksvfl_mudsys;mksvfl\r"
expect ":KILL"
# For now, we don't run this since the resulting files are empty,
# and we are using known good files from backup tapes instead.
# Run mksvfl to create pure library for MDL 54 for the purposes of the 500-point zork
respond "*" ":mudsys;mksvfl\r"
expect ":KILL"
respond "*" ":midas sys3; ts mudinq_sysen2; mudinq\r"
expect ":KILL"

View File

@@ -1282,10 +1282,10 @@ MNDIR: SIXBIT /MUDSAV/ ; DIR OF MAIN DATA BASE FILES
WRKDIR: SIXBIT /MUDTMP/ ; DIRECTORY OF UPDATE FILES
MNBLK: SIXBIT / &DSK/
SIXBIT /SAV/
SIXBIT /FILE/
SIXBIT /54FILE/
FIXBLK: SIXBIT / &DSK/
SIXBIT /FIXUP/
SIXBIT /FILE/
SIXBIT /54FILE/
]

View File

@@ -1,5 +1,5 @@
; -*-MIDAS-*-
TITLE MKSVFL -- Make a new Muddle SAV FILE and FIXUP FILE
TITLE MKSVFL -- Make a new Muddle SAV 54FILE and FIXUP 54FILE
O=0
A=1
@@ -29,14 +29,14 @@ LOC 100
START: MOVE P,[-PDLSIZE,PDL]
MOVEI A,[SIXBIT /SAV/] ;write SAV FILE
MOVEI A,[SIXBIT /SAV/] ;write SAV 54FILE
MOVEM A,OPNNM1
.CALL OPNBLK
.LOSE
.IOT OUTCH,[-<SFEND-SFBEG>,,SFBEG]
.CLOSE OUTCH,
MOVEI A,[SIXBIT /FIXUP/] ;write FIXUP FILE
MOVEI A,[SIXBIT /FIXUP/] ;write FIXUP 54FILE
MOVEM A,OPNNM1
.CALL OPNBLK
.LOSE
@@ -52,7 +52,7 @@ OPNBLK: SETZ
[.BIO,,OUTCH]
[SIXBIT /DSK/]
OPNNM1: 0
[SIXBIT /FILE/]
[SIXBIT /54FILE/]
SETZ [SIXBIT /MUDSAV/]
; PAGE...ENDPAGE pad the data between them to PGSIZE words.