Update IXON flag from character device table (@ctbl)

[z180-stamp-cpm3.git] / cbios / mm.180

diff --git a/cbios/mm.180 b/cbios/mm.180
index 4128fe9702a74df8e43cfb4273d36e7c089468f7..0c3fc363a3c782517ca0b4688b349ea1971131ad 100644 (file)
--- a/cbios/mm.180
+++ b/cbios/mm.180
@@ -221,8 +221,6 @@ phy2log:
 ; Switch stack pointer to "system" stack in top ram\r
 ; Save cbar\r
 ;\r
-       extrn   bs$stack\r
-\r
        cseg    ; common!\r
 \r
        public  _b0call\r
@@ -446,8 +444,8 @@ isv_sw:                                     ;
 isv_sw:                                        ;\r
        ex      (sp),hl                 ;save hl, 'return adr' in hl\r
 \r
-       ld      (istack),sp             ;save user stack pointer\r
-       ld      sp,istack\r
+       ld      (i$stack),sp            ;save user stack pointer\r
+       ld      sp,i$stack\r
        push    de                      ;\r
        push    bc                      ;\r
        push    af                      ;\r
@@ -466,14 +464,18 @@ isv_sw:                                   ;
        pop     af                      ;\r
        pop     bc                      ;\r
        pop     de                      ;\r
-       ld      sp,(istack)             ;\r
+       ld      sp,(i$stack)            ;\r
        pop     hl                      ;\r
        ei                              ;\r
        ret                             ;\r
 \r
    endif\r
-       ds      24\r
-istack:\r
+\r
+       public  i$stack\r
+       rept    24\r
+        db     '|'\r
+       endm\r
+i$stack:\r
        dw      0\r
 \r
        dseg\r
@@ -636,4 +638,13 @@ bnk2bbr:
   endif\r
 \r
 \r
+       cseg\r
+       public  bs$stack\r
+\r
+       rept bs$stack$size\r
+        db     '|'\r
+       endm\r
+bs$stack:\r
+       dw      0\r
+\r
        end\r