From dbaa694684fcda426eaa002f8e3f5fa43e10a6f7 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Tom=C3=A1=C5=A1=20Brada?= <tomasbrod@azet.sk>
Date: Tue, 27 Oct 2015 19:36:56 +0100
Subject: [PATCH] Some changes in fileserver test that i do not want to loose.

---
 TestFS.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/TestFS.pas b/TestFS.pas
index 1674596..72a6602 100644
--- a/TestFS.pas
+++ b/TestFS.pas
@@ -33,7 +33,6 @@ procedure t.ST1(msg:tSMsg; data:boolean);
    writeln('INFO size=',r.ReadWord(4),' final=',r.readbyte,' seg=',r.readword(4));
    ch.Callback:=@ST2;
    UnShedule(@HardTimeout);
-   halt(99);
   end else if op=upClose then writeln('CLOSE')
   else writeln('unknown');
  end;
@@ -51,6 +50,7 @@ procedure t.ST2(msg:tSMsg; data:boolean);
   if op=upCLOSE then writeln('CLOSE ')
   else if op=upDONE then begin
    writeln('DONE');
+   halt(99);
    ch.streaminit(s,1);
    s.WriteByte(opcode.upClose);
    ch.Send(s);
-- 
2.11.4.GIT