]> cloudbase.mooo.com Git - z180-stamp-cpm3.git/blobdiff - cbios/misc.180
refactor print utils
[z180-stamp-cpm3.git] / cbios / misc.180
index 3c36572f9e9488b76e80091688850bcbdde740e5..58122f8cc2281dcdd221e62966fb3637156dfa93 100644 (file)
@@ -3,7 +3,7 @@
        public cpu_frq\r
        public get_tmr\r
 \r
        public cpu_frq\r
        public get_tmr\r
 \r
-       extrn div32_r,?pmsg\r
+       extrn div32_r,pr.inln\r
        extrn msg.sm,msg.recv,hwl2phy\r
 \r
        maclib z180reg.inc\r
        extrn msg.sm,msg.recv,hwl2phy\r
 \r
        maclib z180reg.inc\r
@@ -67,16 +67,13 @@ sp.i.1:
 \r
        add     a,'0'\r
        ld      (spi$nr),a\r
 \r
        add     a,'0'\r
        ld      (spi$nr),a\r
-       ld      hl,spi$msg\r
-       call    ?pmsg\r
-sp.i.2:\r
-       halt\r
-       jr      sp.i.2\r
-\r
-spi$msg:\r
+       call    pr.inln\r
        db      13,10,'Spurious Int: '\r
 spi$nr:        db      '0'\r
        db      0\r
        db      13,10,'Spurious Int: '\r
 spi$nr:        db      '0'\r
        db      0\r
+sp.i.2:\r
+       halt\r
+       jr      sp.i.2\r
 \r
 ;--------------------------------------------------------------------\r
 ;\r
 \r
 ;--------------------------------------------------------------------\r
 ;\r