gazagnaire.org / ocaml-idc
CCSDS 122.0-B Image Data Compression
0
fork

Configure Feed

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

mass replace Printf.sprintf/printf with Fmt.str/pr (merlint E200)

112 files across the monorepo. Printf.sprintf → Fmt.str,
Printf.printf → Fmt.pr for consistent formatting library usage.

Thomas Gazagnaire 65d04486 5a5f7d61

+2 -2
+2 -2
lib/idc.ml
··· 506 506 let wavelet_of_id = function 507 507 | 0 -> `Int_5_3 508 508 | 1 -> `Float_9_7 509 - | n -> invalid_arg (Printf.sprintf "Idc: unknown wavelet id %d" n) 509 + | n -> invalid_arg (Fmt.str "Idc: unknown wavelet id %d" n) 510 510 511 511 let encode_coefficients ~wavelet ~width ~height arr = 512 512 let bw = Bitstream.create (width * height) in ··· 571 571 let compress ?(wavelet = `Int_5_3) ~width ~height data = 572 572 if Bytes.length data <> width * height then 573 573 invalid_arg 574 - (Printf.sprintf "Idc.compress: expected %d bytes, got %d" (width * height) 574 + (Fmt.str "Idc.compress: expected %d bytes, got %d" (width * height) 575 575 (Bytes.length data)); 576 576 match wavelet with 577 577 | `Int_5_3 ->