remove unused global

src/apicode.a

@@ -58,12 +58,6 @@
          !byte FALSE      ; target type (disk drive, CFFA virtual drive, file on hard disk)
                           ; see apidefs.a for values
 
-;gOnAClearDayYouCanReadForever
-         !byte FALSE      ; 0=true, 1=false
-                          ; retry reads with a captured RWTS forever,
-                          ; instead of falling back to built-in RWTS
-                          ; compile-time flag, no way to change at runtime
-
 ;gIsRW18
          !byte FALSE      ; 0=true, 1=false
                           ; reset before each operation

src/apidefs.a

@@ -193,8 +193,7 @@ gMECCFastloadType             = gIs13Sector-$01                       ; byte
 ;gIsRW18 is a special case whose ID is not in the regular inspection path
 gIsRW18                       = gMECCFastloadType-$01                 ; byte
 
-gOnAClearDayYouCanReadForever = gIsRW18-$01                           ; byte
+gTargetType                   = gIsRW18-$01                           ; byte
-gTargetType                   = gOnAClearDayYouCanReadForever-$01     ; byte
 gRAMDiskRef                   = gTargetType-$01                       ; byte
 gHardDiskRef                  = gRAMDiskRef-$01                       ; byte
 gDisplayBytes                 = gHardDiskRef-$0A                      ; 10 bytes
@@ -296,7 +295,6 @@ ConstructStandardDelivery = jConstructStandardDelivery
 !warn "gIsInfocom18=",gIsInfocom18
 !warn "gIs13Sector=",gIs13Sector
 !warn "gIsRW18=",gIsRW18
-!warn "gOnAClearDayYouCanReadForever=",gOnAClearDayYouCanReadForever
 !warn "gTargetType=",gTargetType
 !warn "gRAMDiskRef=",gRAMDiskRef
 !warn "gHardDiskRef=",gHardDiskRef

src/rwts.a

@@ -43,14 +43,9 @@ ReadSector
 
          lda   gIsProtDOS
          beq   _protread
-@go
          ldy   #<gRWTSParams
          lda   #>gRWTSParams
-         jsr   jCallRWTS
+         jmp   jCallRWTS
-         bcc   +
-         lda   gOnAClearDayYouCanReadForever
-         beq   @go
-+        rts
 
 ;
 ; "Protected.DOS" has enough differences that we just
@@ -80,11 +75,7 @@ _protread
          sta   $BF2C      ; execution falls through here
 @go      lda   #<gRWTSParams
          ldy   #>gRWTSParams
-         jsr   $BA00      ; note non-standard entry point
+         jmp   $BA00      ; note non-standard entry point
-         bcc   +
-         lda   gOnAClearDayYouCanReadForever
-         beq   @go
-+        rts
 
 ;-------------------------------
 ; PreReadSector