Ver Fonte

Debug line removed

Artur Efimov há 6 anos atrás
pai
commit
b9edaf5cdd
1 ficheiros alterados com 0 adições e 1 exclusões
  1. 0 1
      src/FreeOberon.Mod

+ 0 - 1
src/FreeOberon.Mod

@@ -555,7 +555,6 @@ VAR fname: ARRAY 120 OF CHAR;
 BEGIN
   fname := 'Programs/'; Strings.Append(s, fname);
   Strings.Append('.Mod', fname);
-  Out.String(">>>");Out.String(fname);Out.Ln;
   F := Files.Old(fname);
   exists := F # NIL;
   IF F # NIL THEN Files.Close(F) END;