git.annexia.org
/
libguestfs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
virt-resize: Document qcow2 output format (RHBZ#642826).
[libguestfs.git]
/
generator
/
generator_utils.ml
diff --git
a/generator/generator_utils.ml
b/generator/generator_utils.ml
index
e3a74e0
..
b7401db
100644
(file)
--- a/
generator/generator_utils.ml
+++ b/
generator/generator_utils.ml
@@
-239,6
+239,8
@@
let seq_of_test = function
| TestOutputTrue s | TestOutputFalse s
| TestOutputLength (s, _) | TestOutputBuffer (s, _)
| TestOutputStruct (s, _)
| TestOutputTrue s | TestOutputFalse s
| TestOutputLength (s, _) | TestOutputBuffer (s, _)
| TestOutputStruct (s, _)
+ | TestOutputFileMD5 (s, _)
+ | TestOutputDevice (s, _)
| TestLastFail s -> s
let c_quote str =
| TestLastFail s -> s
let c_quote str =
@@
-301,3
+303,5
@@
let pod2text ~width name longdesc =
pod2text_memo_updated ();
lines
pod2text_memo_updated ();
lines
+(* Compare two actions (for sorting). *)
+let action_compare (n1,_,_,_,_,_,_) (n2,_,_,_,_,_,_) = compare n1 n2