X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=src%2Fmjc2wsl.java;h=82ae9cc5744182c0b5e87d494dd43c8f7ddea44f;hp=3a9727031b389fd4833b5ee2f8026e5be3a9f0ea;hb=3382daace9411a815924946a61cde708428b6695;hpb=353908644ff9b8a5620304b351384327a98d3c81 diff --git a/src/mjc2wsl.java b/src/mjc2wsl.java index 3a97270..82ae9cc 100644 --- a/src/mjc2wsl.java +++ b/src/mjc2wsl.java @@ -496,9 +496,9 @@ public class mjc2wsl{ } case return_: { - prl("IF EMPTY?(mjvm_mstack) THEN CALL Z FI"); - //else we let things return - prl("END b"+counter+" =="); + //we let the actions return + // there is nothing to clean up + prl("SKIP END b"+counter+" =="); break; } case enter: {