Commit 48e9c50c authored by Ronny Wichers Schreur's avatar Ronny Wichers Schreur 🏘
Browse files

Added initialisations of node_number field

parent 3cda476c
...@@ -1220,6 +1220,7 @@ BETupleSelectNode (int arity, int index, BENodeP node) ...@@ -1220,6 +1220,7 @@ BETupleSelectNode (int arity, int index, BENodeP node)
select->node_symbol = symbol; select->node_symbol = symbol;
select->node_arity = index+1; select->node_arity = index+1;
select->node_arguments = BEArgs (node, NULL); select->node_arguments = BEArgs (node, NULL);
select->node_number = 0;
return (select); return (select);
} /* BETupleSelectNode */ } /* BETupleSelectNode */
...@@ -1236,6 +1237,7 @@ BEIfNode (BENodeP cond, BENodeP then, BENodeP elsje) ...@@ -1236,6 +1237,7 @@ BEIfNode (BENodeP cond, BENodeP then, BENodeP elsje)
node->node_symbol = gBasicSymbols [if_symb]; node->node_symbol = gBasicSymbols [if_symb];
node->node_arguments = BEArgs (cond, BEArgs (then, (BEArgs (elsje, NULL)))); node->node_arguments = BEArgs (cond, BEArgs (then, (BEArgs (elsje, NULL))));
node->node_arity = 3; node->node_arity = 3;
node->node_number = 0;
return (node); return (node);
} /* BEIfNode */ } /* BEIfNode */
...@@ -1261,6 +1263,7 @@ BEGuardNode (BENodeP cond, BENodeDefP thenNodeDefs, BEStrictNodeIdP thenStricts, ...@@ -1261,6 +1263,7 @@ BEGuardNode (BENodeP cond, BENodeDefP thenNodeDefs, BEStrictNodeIdP thenStricts,
node->node_kind = IfNode; node->node_kind = IfNode;
node->node_contents.contents_if = thenElseInfo; node->node_contents.contents_if = thenElseInfo;
node->node_arguments = BEArgs (cond, BEArgs (then, (BEArgs (elsje, NULL)))); node->node_arguments = BEArgs (cond, BEArgs (then, (BEArgs (elsje, NULL))));
node->node_number = 0;
return (node); return (node);
} /* BEGuardNode */ } /* BEGuardNode */
...@@ -1279,6 +1282,7 @@ BESelectorNode (BESelectorKind selectorKind, BESymbolP fieldSymbol, BEArgP args) ...@@ -1279,6 +1282,7 @@ BESelectorNode (BESelectorKind selectorKind, BESymbolP fieldSymbol, BEArgP args)
node->node_symbol = fieldSymbol; node->node_symbol = fieldSymbol;
node->node_arity = selectorKind; node->node_arity = selectorKind;
node->node_arguments = args; node->node_arguments = args;
node->node_number = 0;
return (node); return (node);
} /* BESelectorNode */ } /* BESelectorNode */
...@@ -1318,6 +1322,7 @@ BENodeIdNode (BENodeIdP nodeId, BEArgP args) ...@@ -1318,6 +1322,7 @@ BENodeIdNode (BENodeIdP nodeId, BEArgP args)
node->node_node_id = nodeId; node->node_node_id = nodeId;
node->node_arity = CountArgs (args); node->node_arity = CountArgs (args);
node->node_arguments = args; node->node_arguments = args;
node->node_number = 0;
return (node); return (node);
} /* BENodeIdNode */ } /* BENodeIdNode */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment