1
0
mirror of https://github.com/DoctorWkt/unix-jun72.git synced 2026-02-10 18:30:41 +00:00

- minor tweaks

This commit is contained in:
tim.newsham
2008-04-25 02:07:15 +00:00
parent f79c840126
commit 0fc73e0f99

View File

@@ -2,9 +2,10 @@
rtap: / read from the dec tape
asr r1 / divide the i-number by 2
sub $4.,r1 / (i-number/2)-r r1
sub $4.,r1 / (i-number/2)-r r1
mov r1,cdev / cdev now has device number
jsr r0,bread; 578. / read in block thats in *u.fofp
wtap:
asr r1 / divide i-number by 2
sub $4.,r1 / r1 = i-number minus 4
@@ -39,9 +40,9 @@ bread: / read a block from a block structured device
mov *u.fofp,r1 / move block number to r1
mov $2.-cold,-(sp) / "2-cold" to stack
1:
cpm r1,(r0) / is this block # greater than or equal to
cmp r1,(r0) / is this block # greater than or equal to
/ maximum block # allowed on device
bhis if / yes, if (error)
bhis 1f / yes, if (error)
mov r1,-(sp) / no, put block # on stack
jsr r0,preread / read in the block into an I/O buffer
mov (sp)+,r1 / return block # to r1