vmode attributes in oval

This commit is contained in:
Pascal Brisset
2009-01-19 13:40:44 +00:00
parent 9123ca10ea
commit b8be87ef30
2 changed files with 12 additions and 1 deletions
+5 -1
View File
@@ -166,7 +166,11 @@ radius CDATA #REQUIRED>
<!ATTLIST oval
p1 CDATA #REQUIRED
p2 CDATA #REQUIRED
radius CDATA #REQUIRED>
vmode CDATA #IMPLIED
pitch CDATA #IMPLIED
throttle CDATA #IMPLIED
radius CDATA #REQUIRED
until CDATA #IMPLIED>
<!ATTLIST survey_rectangle
grid CDATA #REQUIRED
+7
View File
@@ -418,6 +418,13 @@ let rec print_stage = fun index_of_waypoints x ->
let r = parsed_attrib x "radius" in
let _vmode = output_vmode x p1 "" in
lprintf "Oval(%s, %s, %s);\n" p1 p2 r;
begin
try
let c = parsed_attrib x "until" in
lprintf "if (%s) NextStageAndBreak();\n" c
with
ExtXml.Error _ -> ()
end;
lprintf "break;\n"
| "set" ->
stage ();