gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
mjc2wsl - more command line options
[mjc2wsl.git] / src / mjc2wsl.java
index 886cd7d..8425314 100644 (file)
@@ -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++;
                        }
 
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner