/[mldonkey]/mldonkey/src/networks/donkey/donkeyProtoOvernet.ml
ViewVC logotype

Diff of /mldonkey/src/networks/donkey/donkeyProtoOvernet.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.16 by spiralvoice, Thu Jul 7 00:25:46 2005 UTC revision 1.17 by spiralvoice, Fri Jul 22 10:58:55 2005 UTC
# Line 323  module Proto = struct Line 323  module Proto = struct
323              if !verbose_overnet then begin              if !verbose_overnet then begin
324                  lprintf_nl "Received code %d message.\nDump:" opcode;                  lprintf_nl "Received code %d message.\nDump:" opcode;
325                  dump s;                  dump s;
326                  lprintf_nl "";                  lprint_newline ();
327                end;                end;
328                            
329              let peer, _ = get_peer s 0 in              let peer, _ = get_peer s 0 in
# Line 373  module Proto = struct Line 373  module Proto = struct
373                begin                begin
374                  lprintf_nl "UNKNOWN: opcode %d" opcode;                  lprintf_nl "UNKNOWN: opcode %d" opcode;
375                  dump s;                  dump s;
376                  lprintf_nl "";                  lprint_newline ();
377                end;                end;
378              OvernetUnknown (opcode, s)              OvernetUnknown (opcode, s)
379        with e ->        with e ->
# Line 381  module Proto = struct Line 381  module Proto = struct
381              begin              begin
382                lprintf_nl "Error %s while parsing opcode %d" (Printexc2.to_string e) opcode;                lprintf_nl "Error %s while parsing opcode %d" (Printexc2.to_string e) opcode;
383                dump s;                dump s;
384                lprintf_nl "";                lprint_newline ();
385              end;              end;
386            OvernetUnknown (opcode, s)            OvernetUnknown (opcode, s)
387            
# Line 417  module Proto = struct Line 417  module Proto = struct
417                    lprintf_nl "Error %s in udp_handler, dump of packet:"                    lprintf_nl "Error %s in udp_handler, dump of packet:"
418                      (Printexc2.to_string e);                      (Printexc2.to_string e);
419                    dump p.UdpSocket.udp_content;                    dump p.UdpSocket.udp_content;
420                    lprintf_nl ""                    lprint_newline ()
421                  end                  end
422            );            );
423        | _ -> ()        | _ -> ()

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26