X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=src%2Fmjc2wsl.java;h=8425314ccddff1e99ee9572929737de989907de8;hp=886cd7d3ba0588bb4f413d5362e8e378c1b045e3;hb=2dc9cef8f7bcc29a968250b0939cd3405ac50057;hpb=ec3c740bef0052321dad7949b470f3bdc6d6bc03 diff --git a/src/mjc2wsl.java b/src/mjc2wsl.java index 886cd7d..8425314 100644 --- a/src/mjc2wsl.java +++ b/src/mjc2wsl.java @@ -32,8 +32,8 @@ public class mjc2wsl{ out.println("total errors:"+messageCounters[M_ERR]+" warnings:"+messageCounters[M_WAR]); } - private boolean addPauseAfterEachAddress=false, - addPrintForEachAddress = false, + private boolean genPauseAfterEachAddress=false, + genPrintForEachAddress = false, genPrintEStackOnChange = false; /** Constant used for marking a regular comment from the original file */ @@ -300,9 +300,9 @@ public class mjc2wsl{ if (originalInComments) prl(createComment(describeOpCode(op), C_OC)); prl("a" + counter + " == "); - if (addPrintForEachAddress) { + if (genPrintForEachAddress) { prl("PRINT(\"a"+counter+"\");"); - if (addPauseAfterEachAddress) + if (genPauseAfterEachAddress) prl("debug_disposable_string := @Read_Line(Standard_Input_Port);"); } switch (op) { @@ -533,10 +533,17 @@ public class mjc2wsl{ printLevel = M_ERR+1;//no printing } else if (args[i].compareToIgnoreCase("--genEStackPrint") == 0) { genPrintEStackOnChange = true; + } else if (args[i].compareToIgnoreCase("--genAddrPause") == 0) { + genPauseAfterEachAddress = true; + } else if (args[i].compareToIgnoreCase("--genAddrPrint") == 0) { + genPrintForEachAddress = true; + } else if (args[i].compareToIgnoreCase("--genAddr") == 0) { + genPrintForEachAddress = true; + genPauseAfterEachAddress = true; } else if (args[i].compareToIgnoreCase("--genAll") == 0) { genPrintEStackOnChange = true; - addPrintForEachAddress = true; - addPauseAfterEachAddress = true; + genPrintForEachAddress = true; + genPauseAfterEachAddress = true; }i++; }