Parent Directory | Revision Log | Patch
revision 1.29 by spiralvoice, Sat Nov 19 17:19:45 2005 UTC | revision 1.30 by spiralvoice, Mon Dec 5 18:37:34 2005 UTC | |
---|---|---|
# | Line 25 open Md4 | Line 25 open Md4 |
25 | open CommonTypes | open CommonTypes |
26 | open LittleEndian | open LittleEndian |
27 | open CommonGlobals | open CommonGlobals |
28 | open CommonOptions | |
29 | ||
30 | open DonkeyOptions | open DonkeyOptions |
31 | open DonkeyTypes | open DonkeyTypes |
# | Line 1172 let rec parse_emule_packet emule opcode | Line 1173 let rec parse_emule_packet emule opcode |
1173 | ||
1174 | | 0x93 (* 147 *) -> | | 0x93 (* 147 *) -> |
1175 | if String.length s < 16 then begin | if String.length s < 16 then begin |
1176 | lprintf_nl "EmuleMultiPacketAnswer: incomplete request"; | if !verbose then lprintf_nl "EmuleMultiPacketAnswer: incomplete request"; |
1177 | raise Not_found | raise Not_found |
1178 | end; | end; |
1179 | let md4 = get_md4 s 1 in | let md4 = get_md4 s 1 in |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |