increase the range of ok ascii

This commit is contained in:
Mylloon 2023-07-04 10:06:31 +02:00
parent ef472a9ba3
commit 9cb058c7ac
Signed by: Anri
GPG key ID: A82D63DFF8D1317F

View file

@ -6,7 +6,7 @@ let get_bytecode ?(json = false) data =
(List.map (List.map
(fun byte -> (fun byte ->
let code = Char.code byte in let code = Char.code byte in
if code >= 65 && code <= 122 if code >= 32 && code <= 126
then String.make 1 byte then String.make 1 byte
else Printf.sprintf "%cx%02X" backslash code) else Printf.sprintf "%cx%02X" backslash code)
(List.of_seq (Bytes.to_seq data))) (List.of_seq (Bytes.to_seq data)))