From 0fc73e0f9959b82406ba538569dcf7fcd9fc865f Mon Sep 17 00:00:00 2001 From: "tim.newsham" Date: Fri, 25 Apr 2008 02:07:15 +0000 Subject: [PATCH] - minor tweaks --- pages/e08-01 | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/pages/e08-01 b/pages/e08-01 index d0abb63..12eefad 100644 --- a/pages/e08-01 +++ b/pages/e08-01 @@ -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