From c57a5170b5933f41832927378142ade08eb3945b Mon Sep 17 00:00:00 2001
From: Maxime Perrotin <Maxime.Perrotin@esa.int>
Date: Fri, 9 Jun 2017 11:44:20 +0200
Subject: [PATCH] Poll GUI every 10 ms instead of 40 ms

---
 Makefile                  |  3 ++-
 c/build_gui_glue.c        | 16 ++++++----------
 c/preprocessing_backend.c |  4 ++--
 3 files changed, 10 insertions(+), 13 deletions(-)

diff --git a/Makefile b/Makefile
index faf4966..10f423b 100644
--- a/Makefile
+++ b/Makefile
@@ -24,8 +24,9 @@ ifeq ($(UNAME), Linux)
 		fi ;                                    \
 	fi
 endif
+	# Extraflag: set --target=x86_64-linux on 64 bits platforms
 	ADA_PROJECT_PATH=`ocarina-config --prefix`/lib/gnat:$$ADA_PROJECT_PATH \
-            $(gnatpath)gprbuild -x -g $(exec) -p -P buildsupport.gpr -XBUILD="debug"
+            $(gnatpath)gprbuild -x -g $(exec) -p -P buildsupport.gpr -XBUILD="debug" ${EXTRAFLAG}
 
 install:
 	$(MAKE)
diff --git a/c/build_gui_glue.c b/c/build_gui_glue.c
index 226b52f..9407923 100644
--- a/c/build_gui_glue.c
+++ b/c/build_gui_glue.c
@@ -1,16 +1,13 @@
-/* Buildsupport is (c) 2008-2015 European Space Agency
+/* Buildsupport is (c) 2008-2017 European Space Agency
  * contact: maxime.perrotin@esa.int
  * License is LGPL, check LICENSE file */
 /* build_gui_glue.c
 
-  this program generates the code to interface a GUI with the assert virtual machine
-  author: cyril colombo/Vega for ESA (this guy is a genuine mercenaire...)(but the best one)
+  this program generates the code to interface a GUI with a TASTE binary
+  author: Cyril Colombo/ESA (this guy is a genuine mercenaire...)(but the best one)
   
-  updated 20/04/2009 to disable in case "-onlycv" flag is set
  */
 
-#define ID "$Id: build_gui_glue.c 437 2010-01-06 09:19:17Z maxime1008 $"
-
 #include <stdio.h>
 #include <string.h>
 #include <stdlib.h>
@@ -28,14 +25,13 @@
  */
 #define C_MAX_NUMBER_MESSAGES    5
 
-/* Constant defining the maximen number of character in a line of a source file */
+/* Constant defining the maximum number of characters in a line of a source file */
 #define C_MAX_LINE_SIZE    256
 
-/*Constant defining the maximum number of characters of a file name */
+/* Constant defining the maximum number of characters of a file name */
 #define C_MAX_FILE_NAME_SIZE    80
 
 
-
 /*
  * Internal variable definition
  */
@@ -58,7 +54,7 @@ static FILE *code_id = NULL;
 
 /* 
  * Name of the cyclic function that polls the shared memory
- * that will be build by this backend 
+ * that will be build by this backend
  */
 static char *cyclic_name = NULL;
 
diff --git a/c/preprocessing_backend.c b/c/preprocessing_backend.c
index bddc988..31b16a6 100644
--- a/c/preprocessing_backend.c
+++ b/c/preprocessing_backend.c
@@ -678,8 +678,8 @@ void Preprocess_FV (FV *fv)
             interface->direction=PI;
             interface->synchronism=asynch;
             interface->rcm=cyclic;
-            /* Poll GUI queue every 40 ms */
-            interface->period = 40;
+            /* Poll GUI queue every 10 ms */
+            interface->period = 10;
             interface->parent_fv = fv;
             interface->wcet_high = 1;
             interface->wcet_low = 1;
-- 
GitLab