gazagnaire.org / ocaml-hcomp
CCSDS 123.0-B Lossless Multispectral and Hyperspectral Image 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 9eb2e5fd 1a9573ae

+2 -2
+2 -2
lib/hcomp.ml
··· 271 271 let expected_len = bands * width * height * 2 in 272 272 if Bytes.length data <> expected_len then 273 273 invalid_arg 274 - (Printf.sprintf "Hcomp.compress: expected %d bytes, got %d" expected_len 274 + (Fmt.str "Hcomp.compress: expected %d bytes, got %d" expected_len 275 275 (Bytes.length data)); 276 276 if bits_per_sample < 1 || bits_per_sample > 16 then 277 277 invalid_arg 278 - (Printf.sprintf "Hcomp.compress: bits_per_sample must be 1..16, got %d" 278 + (Fmt.str "Hcomp.compress: bits_per_sample must be 1..16, got %d" 279 279 bits_per_sample); 280 280 let bw = Bitstream.create (expected_len / 2) in 281 281 (* Header *)