X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2FFUNC%2Fmula_call.casl;fp=as%2FFUNC%2Fmula_call.casl;h=6fa37b6181257ecfdaa33810d3ade09f74714af7;hb=d58121c34669a809d4199741cb03fe53df309d9c;hp=eeaf6d04867ce6f722fbcfb7594ce269e377bbe7;hpb=6a9e7118e7f1a32304a1ffba0cb7a4b44f90d9fe;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