Block free/used for NTFS working

[virt-df.git] / lib / int63_on_64.ml

diff --git a/lib/int63_on_64.ml b/lib/int63_on_64.ml
index a1c9487..c3c4073 100644 (file)
--- a/lib/int63_on_64.ml
+++ b/lib/int63_on_64.ml
@@ -31,9 +31,9 @@ module Operators = struct
   external ( %^ ) : int -> int -> int = "%modint"
   external ( <^< ) : int -> int -> int = "%lslint"
   external ( >^> ) : int -> int -> int = "%lsrint"
-  external ( &&^ ) : int -> int -> int = "%andint"
-  external ( ||^ ) : int -> int -> int = "%orint"
-  external ( ^^^ ) : int -> int -> int = "%xorint"
+  external ( &^ ) : int -> int -> int = "%andint"
+  external ( |^ ) : int -> int -> int = "%orint"
+  external ( ^^ ) : int -> int -> int = "%xorint"
   external ( ~^ ) : int -> int = "%identity"
   external ( ~^~ ) : int -> int = "%negint"
 end