From: Doni Pracner Date: Tue, 10 Dec 2013 23:22:24 +0000 (+0100) Subject: mjc2wsl - return statment processing - let things return where they need to go X-Git-Tag: v0.1.3~7 X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=commitdiff_plain;h=14e2062e3bd241ae77571820a3beb5a3339dd06d mjc2wsl - return statment processing - let things return where they need to go --- diff --git a/src/mjc2wsl.java b/src/mjc2wsl.java index 86743cf..69287f6 100644 --- a/src/mjc2wsl.java +++ b/src/mjc2wsl.java @@ -355,8 +355,11 @@ public class mjc2wsl{ } 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: {