glm94/pdp7-unix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Updated ed2.s based on the new scans from Norman.

Browse Source
This commit is contained in:
Warren Toomey
2016-03-24 08:23:00 +10:00
parent 7614f6dbef
commit 4fe4d7a047
1 changed files with 11 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files
scans/ed2.s
+11 -11
View File
@@ -53,7 +53,7 @@ cs:
szl szl
xor o400000 xor o400000
tad linep tad linep
dac tal1 "??? dac tal1
lac tbufp lac tbufp
dac tal dac tal
3: 3:
@@ -61,13 +61,13 @@ cs:
sad o12 sad o12
jmp 3f jmp 3f
jms putsc; tal1 jms putsc; tal1
isz linsiz "??? isz linsiz
"** 08-rest.pdf page 22 "** 08-rest.pdf page 22
"[handwritten page number top right of scan - 15] "[handwritten page number top right of scan - 15]
jmp 3b jmp 3b
3: 3:
-1 -1
tad lcrhno tad lchrno
rcr rcr
szl szl
xor o400000 xor o400000
@@ -118,7 +118,7 @@ bsrch:
jms compile jms compile
jms srcsav jms srcsav
lac dot lac dot
dad zerop sad zerop
lac eofp lac eofp
bloop: bloop:
tad dm1 tad dm1
@@ -186,7 +186,7 @@ cadvanc:
jms getsc; tal jms getsc; tal
sad delim sad delim
jmp cdone jmp cdone
dac compflg "??? dac compflg
"** 08-rest.pdf page 24 "** 08-rest.pdf page 24
"[handwritten page number top right of scan - 17] "[handwritten page number top right of scan - 17]
dzm lastre dzm lastre
@@ -194,7 +194,7 @@ cadvanc:
jmp error jmp error
"sad o133 "sad o133
"jmp chrcls "jmp chrcls
sad o136 "??? sad o136
jmp beglin jmp beglin
sad o44 sad o44
jmp endlin jmp endlin
@@ -249,7 +249,7 @@ comp: 0 "???
-1 -1
tad comp tad comp
dac 9 dac 9
lac 8 "??? lac 8
"** 08-rest.pdf page 25 "** 08-rest.pdf page 25
"[handwritten page number top right of scan - 18] "[handwritten page number top right of scan - 18]
dac prev dac prev
@@ -310,9 +310,9 @@ matchar: 0 "???
skp skp
jmp 1f jmp 1f
lac matchar lac matchar
adn o17777 and o17777
tad jms1 tad jms1
dac i 8 "??? [unreadable page cutoff] dac i 8
"** 08-rest.pdf page 26 "** 08-rest.pdf page 26
"[handwritten page number top right of scan - 19] "[handwritten page number top right of scan - 19]
lac i exret lac i exret
@@ -375,7 +375,7 @@ mateol: 0 "???
dac exret dac exret
lac i exret lac i exret
dac 9 dac 9
"??? [line is cut off in scan, maybe lac i 8 or jmp i 9] jmp i 9
"** 08-rest.pdf page 27 "** 08-rest.pdf page 27
"[handwritten page number top right of scan - 20] "[handwritten page number top right of scan - 20]
1: "??? 1: "???
@@ -502,7 +502,7 @@ bett1: .=.+1
bett2: .=.+1 bett2: .=.+1
wrflg: .=.+1 wrflg: .=.+1
apt1: .=.+1 apt1: .=.+1
"[page cuts off one label] sfi: .=.+1
"** 08-rest.pdf page 29 "** 08-rest.pdf page 29
"[handwritten page number top right of scan - 22] "[handwritten page number top right of scan - 22]
sfo: .=.+1 sfo: .=.+1