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

allow usage of call_once in procedures

Browse Source
This commit is contained in:
Felix Ruess
2016-12-14 21:58:25 +01:00
parent 995a9ed066
commit 6bbe7d7f29
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
sw/lib/ocaml/fp_proc.ml
+1 -1
View File
@@ -150,7 +150,7 @@ let transform_stage = fun prefix reroutes env xml ->
assert (children=[]);
let attribs = transform_values ["wp"; "vmode"] env attribs in
Xml.Element (tag, attribs, children)
| "call" | "set" ->
| "call" | "call_once" | "set" ->
let attribs = transform_values ["var"] env attribs in
Xml.Element (tag, attribs, children)
| _ -> failwith (sprintf "Fp_proc: Unexpected tag: '%s'" tag)