add ; after pre and post call in flight plan generation

This commit is contained in:
Gautier Hattenberger
2008-02-28 09:55:37 +00:00
parent 858b461834
commit f47782bfc5
+2 -2
View File
@@ -486,7 +486,7 @@ let print_block = fun index_of_waypoints (b:Xml.xml) block_num ->
let n = name_of b in
(* Block entry *)
lprintf "Block(%d) // %s\n" block_num n;
lprintf "%s // pre_call\n" (ExtXml.attrib_or_default b "pre_call" "");
lprintf "%s; // pre_call\n" (ExtXml.attrib_or_default b "pre_call" "");
let excpts, stages =
List.partition (fun x -> Xml.tag x = "exception") (Xml.children b) in
@@ -504,7 +504,7 @@ let print_block = fun index_of_waypoints (b:Xml.xml) block_num ->
lprintf "}\n";
(* Block exit *)
lprintf "%s // post_call\n" (ExtXml.attrib_or_default b "post_call" "");
lprintf "%s; // post_call\n" (ExtXml.attrib_or_default b "post_call" "");
lprintf "break;\n\n"