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

en route for the reorg...

Browse Source
This commit is contained in:
Antoine Drouin
2010-08-17 19:06:55 +00:00
parent 63b9c87754
commit 2868024650
4 changed files with 36 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/tools/gen_aircraft.ml
+17
View File
@@ -94,6 +94,23 @@ let extract_makefile = fun airframe_file makefile_ac ->
end)
(Xml.children xml);
(** Search and dump target sections *)
List.iter (fun x ->
if ExtXml.tag_is x "target" then begin
begin try
fprintf f "\n# makefile target '%s' board '%s'\n\n" (Xml.attrib x "name") (Xml.attrib x "board");
fprintf f "include $(PAPARAZZI_SRC)/conf/autopilot/%s.makefile\n" (Xml.attrib x "name");
fprintf f "include $(PAPARAZZI_SRC)/conf/boards/%s.makefile\n" (Xml.attrib x "board");
with _ -> () end;
(**
match Xml.children x with
[Xml.PCData s] -> fprintf f "%s\n" s
| _ -> failwith (sprintf "Warning: wrong makefile section in '%s': %s\n" airframe_file (Xml.to_string_fmt x))
**)
end)
(Xml.children xml);
(** Look for modules *)
let files = ref [] in
List.iter (fun x ->