X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=lib%2Fvirt_mem.ml;h=fd99b86fac2fc8d11611ffb3d617dc32b7abeac3;hb=ce3a2b6dc35d60e6ac0679b060fd10213c0b4628;hp=a65d95e5efe75567ec1108a10df602870ac7a1fa;hpb=48a85384daa4089f6d310293ab3f8d713740f962;p=virt-mem.git diff --git a/lib/virt_mem.ml b/lib/virt_mem.ml index a65d95e..fd99b86 100644 --- a/lib/virt_mem.ml +++ b/lib/virt_mem.ml @@ -567,7 +567,7 @@ Possibly the '-T' command line parameter was used inconsistently."); let addrmap = try let init_task = Ksymmap.find "init_task" ksyms in - Some (Kernel.task_struct_follower kernel_version + Some (Kernel.task_struct_follower debug kernel_version load addrmap init_task) with Not_found -> @@ -603,7 +603,7 @@ Possibly the '-T' command line parameter was used inconsistently."); let addrmap = try let dev_base = Ksymmap.find "dev_base" ksyms in - Some (Kernel.net_device_follower kernel_version + Some (Kernel.net_device_follower debug kernel_version load addrmap dev_base) with Not_found -> try @@ -613,7 +613,7 @@ Possibly the '-T' command line parameter was used inconsistently."); with Not_found -> try let init_net = Ksymmap.find "init_net" ksyms in - Some (Kernel.net_follower kernel_version + Some (Kernel.net_follower debug kernel_version load addrmap init_net) with Not_found -> eprintf (f_"%s: cannot find dev_base, dev_base_head or init_net symbols in kernel image.\n") !kimage.domname;