use less bandwidth, and more compression
This commit is contained in:
parent
f9cb93b1bc
commit
eee1a4cb91
|
@ -67,8 +67,8 @@ let opt_vm_name =
|
||||||
Arg.(value & opt vm_c Name.root & info [ "n" ; "name"] ~doc)
|
Arg.(value & opt vm_c Name.root & info [ "n" ; "name"] ~doc)
|
||||||
|
|
||||||
let compress_level =
|
let compress_level =
|
||||||
let doc = "Compression level (0 for no compression)" in
|
let doc = "Compression level (0 for no compression, 1-3 fixed with static huffman, 4-9 dynamic with canonic huffman)" in
|
||||||
Arg.(value & opt int 4 & info [ "compression-level" ] ~doc)
|
Arg.(value & opt int 9 & info [ "compression-level" ] ~doc)
|
||||||
|
|
||||||
let force =
|
let force =
|
||||||
let doc = "force VM creation." in
|
let doc = "force VM creation." in
|
||||||
|
|
Loading…
Reference in a new issue