From 0516e1f3b9d48d18fec34ed88ce4fb503d9947a5 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Tom=C3=A1=C5=A1=20Brada?= Date: Fri, 30 Oct 2015 21:24:54 +0100 Subject: [PATCH] ummgr print client address and bug found --- upmgr.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/upmgr.pas b/upmgr.pas index 720aff0..cdeb627 100644 --- a/upmgr.pas +++ b/upmgr.pas @@ -167,6 +167,7 @@ procedure tPrv.Cont; //FreeMem(s.base,s.size); SegLen:=SegLen-sz; dec(wcur); + //FIXME: wait for ack of previous message! if SegLen=0 then begin ch^.StreamInit(s,2); s.WriteByte(upDONE); @@ -259,7 +260,7 @@ procedure tPrv.Init(ag:tAggr_ptr; var nchat:tChat; msg: tSMsg); next:=nil; prev:=nil; chan:=msg.stream.readbyte; {todo: except} - writeln('upmgr: prv init chan=',chan); + writeln('upmgr: prv init ',string(msg.source^),' chan=',chan); weight:=100; wcur:=0; isOpen:=false; Active:=false; -- 2.11.4.GIT