diff --git a/twofish/primitives.ml b/twofish/primitives.ml index 25292aa..c6ed5c3 100644 --- a/twofish/primitives.ml +++ b/twofish/primitives.ml @@ -24,11 +24,9 @@ open Bin let ( << ) x y = left32 x y ;; let ( >> ) x y = right32 x y ;; -let ( & ) x y = and32 x y ;; (* ^ is more useful as a 32-bit XOR than it is as a string-concat *) let ( ^^ ) = ( ^ ) ;; -let ( ^ ) x y = xor32 x y ;; type ctx = { k : Int32.t array;