[Mldonkey-commits] Changes to mldonkey/src/networks/fasttrack/fasttrackPandora.ml

[mldonkey-commits]

Index: mldonkey/src/networks/fasttrack/fasttrackPandora.ml
diff -u mldonkey/src/networks/fasttrack/fasttrackPandora.ml:1.7 
mldonkey/src/networks/fasttrack/fasttrackPandora.ml:1.8
--- mldonkey/src/networks/fasttrack/fasttrackPandora.ml:1.7     Sun Aug  7 
12:57:22 2005
+++ mldonkey/src/networks/fasttrack/fasttrackPandora.ml Sun Oct 16 20:42:54 2005
@@ -233,8 +233,8 @@
       let ciphers = {
           in_cipher = create_cipher ();
           out_cipher = create_cipher ();
-          in_xinu = Int64.of_int 0x51;
-          out_xinu = Int64.of_int 0x51;
+          in_xinu = 0x51L;
+          out_xinu = 0x51L;
         } in
       begin
         try
@@ -687,8 +687,8 @@
         let ciphers = {
             in_cipher = create_cipher ();
             out_cipher = create_cipher ();
-            in_xinu = Int64.of_int 0x51;
-            out_xinu = Int64.of_int 0x51;
+            in_xinu = 0x51L;
+            out_xinu = 0x51L;
           } in
         let c = {
             c_ip = ip;