gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
mjc2wsl - return statment processing - let things return where they need to go
[mjc2wsl.git] / src / mjc2wsl.java
index 86743cf..69287f6 100644 (file)
@@ -355,8 +355,11 @@ public class mjc2wsl{
                        }
 
                        case return_: {
                        }
 
                        case return_: {
-                               prl(createComment("return not fully procesed yet"));
-                               message("return not fully procesed yet", M_WAR);
+                               prl("IF EMPTY?(mjvm_mstack) THEN CALL Z ELSE");
+                               //else we let things return             
+                               prl(cmdFromMStack("tempa"));
+                               prl("SKIP FI");
+                               prl("END b"+counter+" ==");
                                break;
                        }
                        case enter: {
                                break;
                        }
                        case enter: {
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner