X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=src%2Fmjc2wsl.java;h=77678a0beafefd26d47cee8adb44ec1bda285194;hp=4c7618f2a212f0dbdffafebb7915a270fc783666;hb=bfa6f5cb35fa27845f7bdf72f2238f987bf6e83b;hpb=ff01a2d354f1057698e96fcecaa749722a860544

diff --git a/src/mjc2wsl.java b/src/mjc2wsl.java
index 4c7618f..77678a0 100644
--- a/src/mjc2wsl.java
+++ b/src/mjc2wsl.java
@@ -410,7 +410,12 @@ public class mjc2wsl{
 				break;
 			}
 
-			//TODO neg, shl, shr, inc
+			case neg :{
+				prl(getTop());
+				prl(cmdToEStack("-tempa"));
+				break;
+			}			
+			//TODO shl, shr
 			
 			case inc  : {
 				int b1 = get(), b2 = get();
@@ -481,24 +486,24 @@ public class mjc2wsl{
 			}
 
 			// read, print
-			case read:{
+			case bread:{
 				//TODO make it a char for read
 				message("char is read like a number", M_WAR);
 				prl(createComment("char is read like a number",C_SPEC));
 			}
-			case bread: {
+			case read: {
 				prl("tempa := @String_To_Num(@Read_Line(Standard_Input_Port));");
 				prl(cmdToEStack("tempa"));
 				break;
 			}
 
 			// the prints
-			case print:{
+			case bprint:{
 				// TODO need to make it a char on print
 				message("chars will be printed as number codes", M_WAR);
 				prl(createComment("char will be printed as a number code",C_SPEC));
 			}
-			case bprint: {
+			case print: {
 				// TODO printing numbers needs different lengths of spacing
 				prl(getTopTwo());
 				pr(createComment("print spacing",C_SPEC));