Mirrors_Framework/paparazzi
1
0
Fork 0
mirror of https://github.com/paparazzi/paparazzi.git synced 2026-05-23 21:36:28 +08:00
Code Issues Actions 25 Packages Projects Releases Wiki Activity

[modules] protect try catch in gen_modules

Browse Source
This commit is contained in:
Gautier Hattenberger
2015-01-02 21:14:28 +01:00
parent 7183e0998a
commit 8a4d3d7178
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/tools/generators/gen_modules.ml
+2 -2
View File
@@ -177,13 +177,13 @@ let print_periodic_functions = fun modules ->
let status = get_status_name f module_name in
lprintf out_h "if (%s == MODULES_START) {\n" status;
right ();
try lprintf out_h "%s;\n" (Xml.attrib f "start") with _ -> ();
ignore(try lprintf out_h "%s;\n" (Xml.attrib f "start") with _ -> ());
lprintf out_h "%s = MODULES_RUN;\n" status;
left ();
lprintf out_h "}\n";
lprintf out_h "if (%s == MODULES_STOP) {\n" status;
right ();
try lprintf out_h "%s;\n" (Xml.attrib f "stop") with _ -> ();
ignore(try lprintf out_h "%s;\n" (Xml.attrib f "stop") with _ -> ());
lprintf out_h "%s = MODULES_IDLE;\n" status;
left ();
lprintf out_h "}\n";