gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
mjc2wsl - added read command
authorDoni Pracner <quinnuendo@gmail.com>
Tue, 24 Dec 2013 00:04:19 +0000 (01:04 +0100)
committerDoni Pracner <quinnuendo@gmail.com>
Tue, 24 Dec 2013 00:04:19 +0000 (01:04 +0100)
src/mjc2wsl.java

index ee36c5188cf5d9f791352cd67249c4083c0dc43b..6813fbf9c351bf863aaf96d599a1d10ee565286f 100644 (file)
@@ -408,6 +408,11 @@ public class mjc2wsl{
                        }
 
                        //TODO read, print
+                       case read: {
+                               prl("tempa := @String_To_Num(@Read_Line(Standard_Input_Port));");
+                               prl(cmdToEStack("tempa"));
+                               break;
+                       }
 
                        // the prints
                        case bprint: {
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner