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

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

diff --git a/rtl/java/Files.java b/rtl/java/Files.java
index 5ccfa25acacc8822278fce3aa1f2039837e6fd59..9864ca57c1d7a26e4ab3981afc5b8cb13cad281e 100644 (file)
--- a/rtl/java/Files.java
+++ b/rtl/java/Files.java
@@ -99,8 +99,9 @@ class Files
 
                try
                {
-                       filepath = File.createTempFile(SYSTEM.STRING(name), "tmp");
-                       fileregpath = new File(SYSTEM.STRING(name));
+                       String s = (name[0] == 0) ? (".TMP") : SYSTEM.STRING(name);
+                       filepath = File.createTempFile(s, "tmp");
+                       fileregpath = new File(s);
                        filedesc = new RandomAccessFile(filepath, "rw");
                }
                catch(IOException e)