Исправлены VAR-параметры, добавлены модули Files и Strings

[dsw-obn.git] / rtl / SYSTEM.java

diff --git a/rtl/SYSTEM.java b/rtl/SYSTEM.java
index 28d8c466df99d528685380520b5429a2248a18e5..ce1b50621e447042154ad9d70dc11136278673ff 100644 (file)
--- a/rtl/SYSTEM.java
+++ b/rtl/SYSTEM.java
@@ -17,6 +17,11 @@ public class SYSTEM
                return i;
        }
 
+       public static String STRING(byte[] x)
+       {
+               return new String(x, 0, LEN(x));
+       }
+
        public static void COPY(byte[] x, byte[] v)
        {
                int ix = LEN(x);
@@ -67,6 +72,10 @@ public class SYSTEM
                {
                        throw new RuntimeException("WITH TRAP");
                }
+               else if(n == -3)
+               {
+                       throw new RuntimeException("NOT IMPLEMENTED");
+               }
                else
                {
                        throw new RuntimeException("TRAP CODE " + n);