CCSDS 133.0-B Space Packet Protocol for OCaml
monopam: fix fd leak in status; fix sle test syntax
Status.compute_one: scope per-package switch to release repo handles.
ocaml-sle test: remove stray ) after Fmt.failwith.
+2
-2
+2
-2
lib/space_packet.ml
+2
-2
lib/space_packet.ml
···
233
233
234
234
let header_codec =
235
235
Wire.Codec.v "SpacePacketHeader"
236
-
(fun version packet_type secondary_header apid sequence_flags
237
-
sequence_count data_length ->
236
+
(fun version packet_type secondary_header apid sequence_flags sequence_count
237
+
data_length ->
238
238
{
239
239
version;
240
240
packet_type;