i think this issue can be solved by rewiting this cycle with something like this


98          let read len =
99            let buf = String.make len ' ' in
100           let () =
101             let rec wait n =
102               let l,_,_ = Unix.select [socket] [] [] 1. in
103                 if l=[] then begin
104                   self#log#f 4 "No network activity for %d second(s)." n ;
105                   wait (n+1)
                    
                      if n > max then
                      begin
                        disconnect();
                      end ;

106                 end
107             in wait 1
108           in

can you check is it correct code? is disconnect method enough to reinit 
harbor.input, or something else must be done?



31.03.09, 23:37, "Romain Beauxis" <[email protected]>:

>       Hi !
> Le Tuesday 31 March 2009 12:50:10 Romeo, vous avez écrit :
> > i hope you can find out what goes wrong here...
> >
> > log and config are included
> Well, logs with no network activity seem to mean that there was an issue with 
> the network. 
> Did you test this possibility ?
> Romain

------------------------------------------------------------------------------
_______________________________________________
Savonet-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/savonet-users

Reply via email to