if u32 >= 0l then i64
else Int64.add i64 0x1_0000_0000_L
*)
+
+(* XXX We don't currently keep enough data in the parts structure
+ * to allow us to reconstruct missing partition table entries.
+ *)
+let offset_is_free _ _ = false
+
+let callbacks = {
+ parts_cb_probe = probe;
+ parts_cb_offset_is_free = offset_is_free;
+}