github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-03-09 12:30:45 +00:00
Code Issues Releases Wiki Activity

Neater build process for JOTTO.

Browse Source 
Force loading the dictionary from disk instead of DECtape by using a
filename translation instead of binary pathing the core image.
This commit is contained in:
Lars Brinkhoff
2025-02-13 08:28:23 +01:00
parent a37a5f250b
commit 1489766847
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
build/misc.tcl
View File

@@ -449,12 +449,12 @@ respond "*" ":job jotto\r"
respond "*" ":load jotto bin\r"
# Run initialisation code to open the TTY channels.
respond "*" "erase0\033bbeg\033g"
# Patch in the filename DSK;JOTTO DICT.
type "utopen/\0331' dsk\033\r"
type "b/\0331'jotto\033\r"
type "c/\0331'dict\033\r"
# Run the dictionary loader, skipping its filename setup code.
type "beg7\033g"
# Load dictionary from disk instead of DECtape.
respond "ERASE0>>" "\024ut1:*;* *, dsk:games;* *\r"
# Run the dictionary loader.
respond "*" "beg7\033g"
respond "utape drive for dictionary?" "1"
respond "file name?" "JOTTO DICT\r"
# Dump out TS JOTTO including the dictionary.
respond "words" ":pdump sys1;ts jotto\r"
respond "*" ":kill\r"