gazagnaire.org / ocaml-tm
CCSDS TM Transfer Frames (CCSDS 132.0-B-3)
0
fork

Configure Feed

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

tm: fix find_clcw reference in fuzz test

Thomas Gazagnaire 5cfb644f dde2e35f

+1 -1
+1 -1
fuzz/fuzz_tm.ml
··· 167 167 match Tm.decode ~frame_len:(String.length encoded) encoded with 168 168 | Error e -> fail (Fmt.str "decode: %a" Tm.pp_error e) 169 169 | Ok decoded -> ( 170 - match Tm.find_clcw decoded with 170 + match Tm.clcw decoded with 171 171 | None -> fail "no CLCW in decoded frame" 172 172 | Some (Error e) -> fail (Fmt.str "CLCW: %a" Clcw.pp_error e) 173 173 | Some (Ok clcw') ->