git.annexia.org
/
virt-mem.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
More kerneldb
[virt-mem.git]
/
lib
/
virt_mem_utsname.ml
diff --git
a/lib/virt_mem_utsname.ml
b/lib/virt_mem_utsname.ml
index
33ee969
..
6a725f5
100644
(file)
--- a/
lib/virt_mem_utsname.ml
+++ b/
lib/virt_mem_utsname.ml
@@
-47,7
+47,7
@@
let parse_utsname bits =
| { _ } ->
None
| { _ } ->
None
-let find_utsname debug ({ domname = name; mem = mem } as image
, ksymmap)
=
+let find_utsname debug ({ domname = name; mem = mem } as image
) ksymmap
=
let utsname =
(* In Linux 2.6.25, the symbol is init_uts_ns.
* http://lxr.linux.no/linux/init/version.c
let utsname =
(* In Linux 2.6.25, the symbol is init_uts_ns.
* http://lxr.linux.no/linux/init/version.c
@@
-78,6
+78,8
@@
let find_utsname debug ({ domname = name; mem = mem } as image, ksymmap) =
parse_utsname bits
with
Not_found ->
parse_utsname bits
with
Not_found ->
- eprintf (f_"%s: could not find utsname in kernel image\n") name
+ eprintf (f_"%s: could not find utsname in kernel image\n")
+ name;
+ None
in
in
- (image, ksymmap, utsname)
+ image, utsname