gitweb on Svarog
projekti pod git sistemom za održavanje verzija -- projects under the git version control systemdiff --git a/src/mjc2wsl.java b/src/mjc2wsl.java
--- a/src/mjc2wsl.java
+++ b/src/mjc2wsl.java
}
case arraylength: {
prl(createTopEStack());
- // TODO make an array length function of some sort!
- prl(createComment(
- "array length not known - LENGTH not aplicable to arrays",
- C_ERR));
- messages.message("array length not known - LENGTH not aplicable to arrays", TransMessages.M_ERR);
- prl(createComment("put 1 on the stack for consistency", C_SPEC));
- prl(createToEStack(1));
+ prl("tempb := LENGTH("+ createArray("tempa") + ");");
+ prl(createToEStack("tempb"));
break;
}
else
prl("CALL a" + counter + " END");
}
- prl("CALL Z;\nSKIP END\nENDACTIONS;\n");
+ prl("\nSKIP END\nENDACTIONS;\n");
prl(createStandardEnd());
}
}
public void printHelpHelp() {
- System.out.println("Help options");
+ System.out.println("Help and info options");
System.out.println(" -h basic help");
System.out.println(" --help print more detailed help");
+ System.out.println(" --version or -version print version and exit");
}
public void printUsage(){
} else if (args[i].compareTo("--help") == 0) {
printLongHelp();
return;
+ } else if (args[i].compareTo("--version") == 0
+ || args[i].compareTo("-version") == 0) {
+ printVersion();
+ return;
} else if (args[i].compareTo("-o") == 0
|| args[i].startsWith("--oc")) {
if (args[i].length() == 2)