Добавлена возможножность вызова команд

[dsw-obn.git] / rtl / Oberon.obn

diff --git a/rtl/Oberon.obn b/rtl/Oberon.obn
index 3316b850ea9e30bfd4b0c82eac8f77994fb0a1b3..37067d702e8879834e09136b304f7f894bd20920 100644 (file)
--- a/rtl/Oberon.obn
+++ b/rtl/Oberon.obn
@@ -29,7 +29,6 @@ BEGIN
   i := 1;
   WHILE i < Args.count DO
     Args.GetArg(i, str); Texts.WriteString(W, str); Texts.Write(W, " ");
-    Out.String("Param "); Out.Int(i, 0); Out.Char(" "); Out.String(str); Out.Ln;
     INC(i)
   END;
   Texts.Append(Par.text, W.buf);