Mirrors_Framework/paparazzi
1
0
Fork 0
mirror of https://github.com/paparazzi/paparazzi.git synced 2026-05-30 03:27:33 +08:00
Code Issues Actions 25 Packages Projects Releases Wiki Activity

[sim] protect binding if ac_id field doesn't exists

Browse Source
This commit is contained in:
Gautier Hattenberger
2017-07-20 19:02:56 +02:00
parent 6d60a2c0a8
commit 9c939bdff8
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/simulator/sitl.ml
+4 -4
View File
@@ -179,10 +179,10 @@ module Make (A:Data.MISSION) (FM: FlightModel.SIG) = struct
let msg_id, _ = Dl_Pprz.message_of_name name in let msg_id, _ = Dl_Pprz.message_of_name name in
let s = Dl_Pprz.payload_of_values msg_id ground_id vs in let s = Dl_Pprz.payload_of_values msg_id ground_id vs in
set_message (Protocol.string_of_payload s) in set_message (Protocol.string_of_payload s) in
let ac_id = PprzLink.int_assoc "ac_id" vs in let ac_id = try Some (PprzLink.int_assoc "ac_id" vs) with _ -> None in
match link_mode with match link_mode, ac_id with
PprzLink.Forwarded when ac_id = !my_id -> if dl_button#active then set () PprzLink.Forwarded, Some x when x = !my_id -> if dl_button#active then set ()
| PprzLink.Broadcasted -> if dl_button#active then set () | PprzLink.Broadcasted, _ -> if dl_button#active then set ()
| _ -> () | _ -> ()
let message_bind = fun name link_mode -> let message_bind = fun name link_mode ->