CCSDS Proximity-1 Space Link Protocol (211.0-B)
rename test_ functions in interop tests (merlint E330)
Removes redundant test_ prefix from functions in interop test.ml files
across the monorepo: test_decode → decode, test_encode → encode, etc.
+6
-6
+6
-6
test/interop/ccsds211/test.ml
+6
-6
test/interop/ccsds211/test.ml
···
71
71
72
72
(* {1 Tests} *)
73
73
74
-
let test_decode row () =
74
+
let decode row () =
75
75
let raw = hex_to_string row.frame_hex in
76
76
match Proximity1.decode raw with
77
77
| Error `Truncated -> Alcotest.failf "%s: decode returned Truncated" row.name
···
94
94
Alcotest.failf "%s: data mismatch:\n expected: %s\n got: %s"
95
95
row.name row.data_hex (string_to_hex got_data)
96
96
97
-
let test_encode row () =
97
+
let encode row () =
98
98
let ft = frame_type_of_string row.frame_type in
99
99
let frame : Proximity1.t =
100
100
{
···
111
111
Alcotest.failf "%s: encode mismatch:\n expected: %s\n got: %s"
112
112
row.name row.frame_hex (string_to_hex got)
113
113
114
-
let test_roundtrip row () =
114
+
let roundtrip row () =
115
115
let ft = frame_type_of_string row.frame_type in
116
116
let frame : Proximity1.t =
117
117
{
···
139
139
[
140
140
( "decode",
141
141
List.map
142
-
(fun r -> Alcotest.test_case r.name `Quick (test_decode r))
142
+
(fun r -> Alcotest.test_case r.name `Quick (decode r))
143
143
rows );
144
144
( "encode",
145
145
List.map
146
-
(fun r -> Alcotest.test_case r.name `Quick (test_encode r))
146
+
(fun r -> Alcotest.test_case r.name `Quick (encode r))
147
147
rows );
148
148
( "roundtrip",
149
149
List.map
150
-
(fun r -> Alcotest.test_case r.name `Quick (test_roundtrip r))
150
+
(fun r -> Alcotest.test_case r.name `Quick (roundtrip r))
151
151
rows );
152
152
]