lseek: use STZ for APPLE2ENH

(As suggested in pull request.)

diff --git a/libsrc/apple2/lseek.s b/libsrc/apple2/lseek.s
index b1b7b6afb56940ed49661d458c9ab4424ed1d293..6d5eba8a233b8eb19fdf74818e9745649a434bed 100644 (file)
--- a/libsrc/apple2/lseek.s
+++ b/libsrc/apple2/lseek.s
@@ -85,8 +85,12 @@ seek_common:
         bcs     oserr
 
         ; Need to return the position in EAX
+        .ifdef  __APPLE2ENH__
+        stz     sreg+1
+        .else
         lda     #0
         sta     sreg+1
+        .endif
         lda     mliparam + MLI::MARK::POSITION+2
         sta     sreg
         ldx     mliparam + MLI::MARK::POSITION+1