Преглед на файлове

* File move to tests directory.

daniel преди 27 години
родител
ревизия
e0ab74277c
променени са 1 файла, в които са добавени 15 реда и са изтрити 0 реда
  1. 15 0
      rtl/os2/tests/atx.pas

+ 15 - 0
rtl/os2/tests/atx.pas

@@ -0,0 +1,15 @@
+program atx;
+
+var f:text;
+    s:string;
+
+begin
+    assign(f,'c:\autoexec.bat');
+    reset(f);
+    while not eof(f) do
+        begin
+            readln(f,s);
+            writeln(s);
+        end;
+    close(f);
+end.