X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=src%2Fmjc2wsl.java;h=dec76fe6b66d64c19d3d707e6dfa63c010d9c613;hp=4723e4d7188758aa7fec99484ac4b818de92abc2;hb=34f67954f6c40e028250b6c0ac8367b811202740;hpb=c28c57c3cd1ff13e4bc91548f49bd99248a453c7 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);");