--- a/os9/mc09/mclibos9.c	Sat Dec 29 23:05:40 2018 +0900
+++ b/os9/mc09/mclibos9.c	Sun Dec 30 08:27:58 2018 +0900
@@ -76,7 +76,7 @@
                 if (i==1) *q = *p;
                 q++; p++;
             }
-            if (i==1) { *q = 0; argv[++n] = q+1; }
+            if (i==1&&p!=args) { *q = 0; argv[++n] = q+1; }
             argc = n;
         }
         argv[n]=0;
@@ -233,18 +233,18 @@
 {
     int c;
 #asm
-        pshs      d,x,y,u
-        ldx       2,u         
+        pshs      y
+        ldx       4,u         
         lda       1,x       file descriptor
-        leax      1,S
-        clr       ,s
+        leax      -1,u
+        clr       -2,u
         ldy       #1
         os9       I$Read
         bcc       _LC0005
         ldd       #-1
-        std       ,s
+        std       -2,u
 _LC0005
-        puls      d,x,y,u
+        puls      y
 #endasm
 }
 
@@ -253,13 +253,13 @@
 {	
     int ret;
 #asm
-        pshs      d,x,y,u
-        ldx       4,u         
+        pshs      y
+        ldx       6,u         
         lda       1,x       file descriptor
-        leax      3,u
+        leax      5,u
         ldy       #1
         os9       I$Write
-        puls      d,x,y,u
+        puls      y
 #endasm
      return c;
 }