Исправлены опережающие объявления локальных типов-записей, добавлены модули Oberon...

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

diff --git a/rtl/java/SYSTEM.java b/rtl/java/SYSTEM.java
index d3e1ae2e013e14d4fa67dd37104805b6922b36c5..e1105c0aa3abd3c9fb3c5efe2253550300cf7bb5 100644 (file)
--- a/rtl/java/SYSTEM.java
+++ b/rtl/java/SYSTEM.java
@@ -39,6 +39,11 @@ public class SYSTEM
                v[i] = 0;
        }
 
+       public static void COPY(String x, byte[] v)
+       {
+               COPY(x.getBytes(), v);
+       }
+
        public static int STRCMP(byte[] a, byte[] b)
        {
                int i = 0;