From: Alan Cox <alan@linux.intel.com>
Date: Wed, 4 Jul 2018 23:17:15 +0000 (+0100)
Subject: stringy: more debug work
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=25fa97dceb90570a5d3dbca7c9f6afedc28be6ce;p=FUZIX.git

stringy: more debug work
---

diff --git a/Kernel/platform-trs80m1/devstringy.c b/Kernel/platform-trs80m1/devstringy.c
index 48856181..1b9169f2 100644
--- a/Kernel/platform-trs80m1/devstringy.c
+++ b/Kernel/platform-trs80m1/devstringy.c
@@ -104,6 +104,7 @@ int tape_close(uint8_t minor)
     minor;
     busy = 0;
     inio = 0;
+    inpos = 0;
     if (mode == O_WRONLY)
         if (tape_op(fileid, TAPE_CLOSEW))
             return tape_error();
@@ -117,19 +118,13 @@ static int tape_rw(uint8_t op)
     uint8_t pos = fileid;
 
     if (!inpos) {
-            pos--;
-            kprintf("find %d\n", pos);
-            if (!pos &&  tape_rewind() == 0)
-                inpos = 1;
-            else if (pos && tape_op(pos, TAPE_FIND) == 0)
+            if (tape_op(pos, TAPE_FIND) == 0)
                 inpos = 1;
             else
                 return tape_error();
     }
-    kprintf("do tapeop %d %d\n", fileid, op);
     inio = 1;
     udata.u_done = tape_op(fileid, op);
-    kprintf("read %d\n", udata.u_done);
     if (tape_err)
         return tape_error();
     return udata.u_done;