gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
mjc2wsl process sub and mul
[mjc2wsl.git] / src / mjc2wsl.java
index 521be05..c269f20 100644 (file)
@@ -273,6 +273,18 @@ public class mjc2wsl{
                                prl(cmdToEStack("tempres"));
                                break;
                        }
+                       case sub: {
+                               prl(getTopTwo());
+                               prl("tempres := tempb - tempa;");
+                               prl(cmdToEStack("tempres"));
+                               break;
+                       }
+                       case mul: {
+                               prl(getTopTwo());
+                               prl("tempres := tempb * tempa;");
+                               prl(cmdToEStack("tempres"));
+                               break;
+                       }
                        case div: {
                                prl(getTopTwo());
                                prl("tempres := tempb / tempa;");
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner