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

[generator] Fix special characters in flight plan and settings

Browse Source
This commit is contained in:
fvantienen
2013-09-27 23:53:20 +02:00
parent 9add5d1c31
commit d3ac39c6fc
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/tools/gen_flight_plan.ml
+1 -1
View File
@@ -800,7 +800,7 @@ let () =
List.iter List.iter
(fun s -> (fun s ->
let v = ExtXml.attrib s "name" in let v = ExtXml.attrib s "name" in
lprintf "#define BLOCK_%s %d\n" (Str.global_replace (Str.regexp "[\\. ]") "_" v) !idx; incr idx) blocks; lprintf "#define BLOCK_%s %d\n" (Str.global_replace (Str.regexp "[^A-Za-z0-9]") "_" v) !idx; incr idx) blocks;
lprintf "\n"; lprintf "\n";
let index_of_waypoints = let index_of_waypoints =
sw/tools/gen_settings.ml
+1 -1
View File
@@ -74,7 +74,7 @@ let print_dl_settings = fun settings ->
List.iter List.iter
(fun s -> (fun s ->
let v = ExtXml.attrib s "var" in let v = ExtXml.attrib s "var" in
lprintf "#define SETTINGS_%s %d\n" (Str.global_replace (Str.regexp "\\.") "_" v) !idx; incr idx) lprintf "#define SETTINGS_%s %d\n" (Str.global_replace (Str.regexp "[^A-Za-z0-9]") "_" v) !idx; incr idx)
settings; settings;
lprintf "\n"; lprintf "\n";