X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2FFUNC%2Fmula_call.casl;h=6fa37b6181257ecfdaa33810d3ade09f74714af7;hb=ffe8e22a52a385d795889c5cabbde2f277342e32;hp=eeaf6d04867ce6f722fbcfb7594ce269e377bbe7;hpb=fb54b1c9d2fbc3d4a62c6b4d38ff68e9d3b25c26;p=YACASL2.git diff --git a/as/FUNC/mula_call.casl b/as/FUNC/mula_call.casl index eeaf6d0..6fa37b6 100644 --- a/as/FUNC/mula_call.casl +++ b/as/FUNC/mula_call.casl @@ -7,7 +7,6 @@ LOOPX CPA GR3,XCNT LOOPY CPA GR4,YCNT JZE XNEXT LD GR2,Y,GR4 - OUT SEP,SLEN CALL OUTA PUSH 0,GR1 LD GR1,GR2 @@ -19,7 +18,7 @@ LOOPY CPA GR4,YCNT LD GR1,GR0 CALL OUTA POP GR1 -YNEXT OUT SEP,SLEN +YNEXT OUT SEP,SLEN LAD GR4,1,GR4 JUMP LOOPY WOV OUT YOMSG,YLEN