First message received by airborne wavecard

sw/tools/gen_dl.ml

@@ -60,7 +60,7 @@ let parse_message = fun m ->
   fprintf out "\n";
   define (sprintf "DL_%s_ID" msg_name) (Xml.attrib m "ID");
   
-  let offset = ref 0 in
+  let offset = ref 1 in (** 1 for the tag of the message *)
   let rec parse_field = fun f ->
     match Xml.tag f with
       "field" ->