Licklider Transmission Protocol (CCSDS 734.1-B) for reliable DTN links
0
fork

Configure Feed

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

pus: rename test_ functions, fix service_type doc (merlint E330/E410)

+5 -9
+5 -9
test/interop/ion/test.ml
··· 11 11 12 12 let hex_of_string s = 13 13 let buf = Buffer.create (String.length s * 2) in 14 - String.iter 15 - (fun c -> Buffer.add_string buf (Fmt.str "%02x" (Char.code c))) 16 - s; 14 + String.iter (fun c -> Buffer.add_string buf (Fmt.str "%02x" (Char.code c))) s; 17 15 Buffer.contents buf 18 16 19 17 let string_of_hex hex = ··· 86 84 Alcotest.run "ltp-interop-ion" 87 85 [ 88 86 ( "encode", 89 - List.map 90 - (fun v -> Alcotest.test_case v.name `Quick (encode v)) 91 - vectors ); 87 + List.map (fun v -> Alcotest.test_case v.name `Quick (encode v)) vectors 88 + ); 92 89 ( "decode", 93 - List.map 94 - (fun v -> Alcotest.test_case v.name `Quick (decode v)) 95 - vectors ); 90 + List.map (fun v -> Alcotest.test_case v.name `Quick (decode v)) vectors 91 + ); 96 92 ( "roundtrip", 97 93 List.map 98 94 (fun v -> Alcotest.test_case v.name `Quick (roundtrip v))