1
0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-01-28 04:58:08 +00:00

Merge pull request #10 from decuser/master

changes based on scan compare
This commit is contained in:
Warren
2016-02-29 10:25:00 +10:00
3 changed files with 8 additions and 10 deletions

View File

@@ -9,7 +9,7 @@
dac name
loop:
sys open; name; 0; 0
sys open; name: 0; 0
spa
jmp badfile
dac fi
@@ -74,7 +74,7 @@ getc: 0
lac ipt
sad eipt
jmp 1f
dac 1f
dac 2f
add o400000
dac ipt
ral
@@ -96,7 +96,7 @@ getc: 0
dac ipt
jmp getc+1
1:
lac 64
lac o4
jmp getc i
putc: 0

View File

@@ -42,7 +42,7 @@ dac dskbuf1
dzm licnt
dzm blcnt
dzm curi
jms coopyz i; usetab; 500
jms copyz i; usetab; 500
iloop:
isz curi
@@ -68,7 +68,7 @@ iloop:
1:
lac i t1
sza
jms dupchech
jms dupcheck
isz t1
isz t2
jmp 1b
@@ -108,7 +108,7 @@ iloop:
dupcheck: 0
isz blcnt
jms betwen i d709; d6400
jms betwen i; d709; d6400
jmp badadr
dac t5
lrss 4
@@ -128,8 +128,6 @@ dupcheck: 0
lac i t6
xor bit
dac i t6
xor bit
dac i t6
jmp i dupcheck
badadr:
@@ -181,7 +179,7 @@ part2:
sys write; m4; m4s
lac indircnt
jms print
dac d1
lac d1
sys write; m5; m5s
lac blcnt
jms print

View File

@@ -47,7 +47,7 @@ loop:
tad d4
dac name
lac octal
sys chowner; name: 0
sys chowner; name:0
sma
jmp loop
lac name