Made dio_read(), dio_write(), and dio_write_verify() catch sector number conversion...

diff --git a/libsrc/geos-cbm/disk/dio_read.s b/libsrc/geos-cbm/disk/dio_read.s
index db46c9b695bb3a2ca61e8dd9d54380e2301fd868..ac19f9afa4502fe7f87b0fcf9254fd1cbcfaa30c 100644 (file)
--- a/libsrc/geos-cbm/disk/dio_read.s
+++ b/libsrc/geos-cbm/disk/dio_read.s
@@ -1,6 +1,6 @@
 ;
-; Maciej 'YTM/Elysium' Witkowiak
-; 2.7.2001
+; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak
+; 2015-08-27, Greg King
 ;
 ; this file provides the _dio_read function
 ;
@@ -15,7 +15,9 @@
 
 _dio_read:
         jsr dio_params
+        tay
+        bne err
         jsr ReadBlock
         stx __oserror
         txa
-        rts
+err:    rts

diff --git a/libsrc/geos-cbm/disk/dio_write.s b/libsrc/geos-cbm/disk/dio_write.s
index 14267803a20a163e2dc2e4eb148e6d35c0d35cea..a5f747519c17ec5020fc805e6a792c09874adabb 100644 (file)
--- a/libsrc/geos-cbm/disk/dio_write.s
+++ b/libsrc/geos-cbm/disk/dio_write.s
@@ -1,6 +1,6 @@
 ;
-; Maciej 'YTM/Elysium' Witkowiak
-; 2.7.2001
+; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak
+; 2015-08-27, Greg King
 ;
 ; this file provides the _dio_write function
 ;
@@ -15,5 +15,9 @@
 
 _dio_write:
         jsr dio_params
+        tay
+        bne err
         jsr WriteBlock
         jmp setoserror
+
+err:    rts

diff --git a/libsrc/geos-cbm/disk/dio_writev.s b/libsrc/geos-cbm/disk/dio_writev.s
index 7cb9b029f8976f395131c0a4d5e8eb6294aadc7d..9b36ed09674c9318ffc44bd89f48323923c6eec4 100644 (file)
--- a/libsrc/geos-cbm/disk/dio_writev.s
+++ b/libsrc/geos-cbm/disk/dio_writev.s
@@ -1,6 +1,6 @@
 ;
-; Maciej 'YTM/Elysium' Witkowiak
-; 2.7.2001
+; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak
+; 2015-08-27, Greg King
 ;
 ; this file provides the _dio_write function
 ;
@@ -15,7 +15,9 @@
 
 _dio_write_verify:
         jsr dio_params
+        tay
+        bne err
         jsr VerWriteBlock
         stx __oserror
         txa
-        rts
+err:    rts