git.annexia.org
/
ocaml-libvirt.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Clarify the license for Debian.
[ocaml-libvirt.git]
/
mlvirsh
/
mlvirsh.ml
diff --git
a/mlvirsh/mlvirsh.ml
b/mlvirsh/mlvirsh.ml
index
c074bc6
..
6bf695a
100644
(file)
--- a/
mlvirsh/mlvirsh.ml
+++ b/
mlvirsh/mlvirsh.ml
@@
-494,7
+494,7
@@
let do_command =
cmd3 print_string
(fun dom offset size ->
let buf = String.create size in
cmd3 print_string
(fun dom offset size ->
let buf = String.create size in
- D.memory_peek dom
D.Virtual
offset size buf 0;
+ D.memory_peek dom
[D.Virtual]
offset size buf 0;
buf)
(arg_readonly_connection domain_of_string)
Int64.of_string int_of_string,
buf)
(arg_readonly_connection domain_of_string)
Int64.of_string int_of_string,