From 88fa81dd185ca6afa28b4850c8e7b53a38d03150 Mon Sep 17 00:00:00 2001
From: Gautier Hattenberger <gautier.hattenberger@enac.fr>
Date: Wed, 8 Feb 2012 15:32:12 +0100
Subject: [PATCH] parse gps pacc in GPS_INT message

---
 sw/ground_segment/tmtc/rotorcraft_server.ml | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sw/ground_segment/tmtc/rotorcraft_server.ml b/sw/ground_segment/tmtc/rotorcraft_server.ml
index ac75d3e04c..2bb2ac4417 100644
--- a/sw/ground_segment/tmtc/rotorcraft_server.ml
+++ b/sw/ground_segment/tmtc/rotorcraft_server.ml
@@ -179,6 +179,8 @@ let log_and_parse = fun ac_name (a:Aircraft.aircraft) msg values ->
       a.flight_time   <- ivalue "flight_time";
       (*if a.gspeed > 3. && a.ap_mode = _AUTO2 then
           Wind.update ac_name a.gspeed a.course*)
+  | "GPS_INT" ->
+      a.gps_Pacc <- ivalue "pacc"
   | "ROTORCRAFT_STATUS" ->
       a.vehicle_type  <- Rotorcraft;
       a.fbw.rc_status <- get_rc_status (ivalue "rc_status");