QEMU/KVM virtual machine management via QMP
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

fix(lint): replace Printf/Format with Fmt in block and bpsec

+2 -2
+1 -1
lib/qmp_protocol.ml
··· 124 124 let to_json t = 125 125 match Jsont.Json.encode jsont t with 126 126 | Ok json -> json 127 - | Error e -> failwith (Fmt.str "Failed to encode command: %s" e) 127 + | Error e -> Fmt.failwith "Failed to encode command: %s" e 128 128 129 129 (* Common commands *) 130 130 let qmp_capabilities = make "qmp_capabilities"
+1 -1
lib/vm.ml
··· 260 260 | Ok s -> 261 261 Log.debug (fun m -> m "Sending: %s" s); 262 262 write_line t s 263 - | Error e -> failwith (Fmt.str "Failed to encode command: %s" e) 263 + | Error e -> Fmt.failwith "Failed to encode command: %s" e 264 264 265 265 let receive_response t = 266 266 let rec loop () =