X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=src%2Fmjc2wsl.java;fp=src%2Fmjc2wsl.java;h=dec76fe6b66d64c19d3d707e6dfa63c010d9c613;hp=4723e4d7188758aa7fec99484ac4b818de92abc2;hb=13695fb09706ad9035f7acc12d7a09954ed1843d;hpb=7d9df2bceb240e94e6de2409c2022d387a39122b diff --git a/src/mjc2wsl.java b/src/mjc2wsl.java index 4723e4d..dec76fe 100644 --- a/src/mjc2wsl.java +++ b/src/mjc2wsl.java @@ -728,7 +728,7 @@ public class mjc2wsl{ prl(createTopTwoEStack()); if (genInlinePrint){ prl(createComment("print spacing",C_SPEC)); - prl("PRINFLUSH(SUBSTR(\" \", 0, MIN(10, MAX(0, tempa-1))), tempb);"); + prl("PRINFLUSH(SUBSTR(\" \", 0, MIN(10, MAX(0, tempa-SLENGTH(@String(tempb))))), tempb);"); } else prl("Print_MJ(tempb,tempa);");