[paparazzi-commits] [5530] tweaking comments

[antoine drouin]

Revision: 5530
          http://svn.sv.gnu.org/viewvc/?view=rev&root=paparazzi&revision=5530
Author:   poine
Date:     2010-08-21 20:39:50 +0000 (Sat, 21 Aug 2010)
Log Message:
-----------
tweaking comments

Modified Paths:
--------------
    paparazzi3/trunk/sw/tools/gen_aircraft.ml

Modified: paparazzi3/trunk/sw/tools/gen_aircraft.ml
===================================================================
--- paparazzi3/trunk/sw/tools/gen_aircraft.ml   2010-08-21 20:36:19 UTC (rev 
5529)
+++ paparazzi3/trunk/sw/tools/gen_aircraft.ml   2010-08-21 20:39:50 UTC (rev 
5530)
@@ -129,9 +129,9 @@
     (Xml.children xml);
   !files
 
-(** (String.compare (Xml.attrib x "location") "after" = 0)
+(**
     Search and dump the makefile sections 
-  **)
+**)
 let dump_makefile_section = fun xml makefile_ac airframe_infile 
print_if_loc_after ->
   List.iter (fun x ->
     if ExtXml.tag_is x "makefile" then begin
@@ -213,7 +213,9 @@
   List.iter (fun tag ->
     if ExtXml.tag_is tag "firmware" then begin
       begin try
-        fprintf makefile_ac "\n######################\n# makefile firmware 
'%s' \n" (Xml.attrib tag "name");
+        fprintf makefile_ac 
"\n####################################################\n";
+        fprintf makefile_ac   "# makefile firmware '%s' \n" (Xml.attrib tag 
"name");
+        fprintf makefile_ac   
"####################################################\n";
        List.iter (parse_targets makefile_ac tag) (Xml.children tag )
       with _ -> () end;
     end)