Reorganize the code so disk parsing is in a separate library.

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

diff --git a/virt-df/virt_df_mbr.ml b/lib/diskimage_mbr.ml
similarity index 97%
rename from virt-df/virt_df_mbr.ml
rename to lib/diskimage_mbr.ml
index f0e8c37..bd02f65 100644 (file)
--- a/virt-df/virt_df_mbr.ml
+++ b/lib/diskimage_mbr.ml
@@ -24,8 +24,7 @@ open Printf
 open Unix
 open ExtList
 
-open Virt_df_gettext.Gettext
-open Virt_df
+open Diskimage_utils
 
 let sector_size = 512
 let sector_size64 = 512L
@@ -174,6 +173,3 @@ and uint64_of_int32 u32 =
   let i64 = Int64.of_int32 u32 in
   if u32 >= 0l then i64
   else Int64.add i64 0x1_0000_0000_L
-
-(* Register with main code. *)
-let () = partition_type_register "MBR" probe_mbr