Hept2mls: fixed missing enter_node
This commit is contained in:
parent
9640acb3a4
commit
f09792485e
|
@ -187,6 +187,7 @@ let translate_contract contract =
|
||||||
c_controllables = List.map translate_var l_c }
|
c_controllables = List.map translate_var l_c }
|
||||||
|
|
||||||
let node n =
|
let node n =
|
||||||
|
enter_node n.Heptagon.n_name;
|
||||||
{ n_name = n.Heptagon.n_name;
|
{ n_name = n.Heptagon.n_name;
|
||||||
n_stateful = n.Heptagon.n_stateful;
|
n_stateful = n.Heptagon.n_stateful;
|
||||||
n_unsafe = n.Heptagon.n_unsafe;
|
n_unsafe = n.Heptagon.n_unsafe;
|
||||||
|
|
Loading…
Reference in a new issue