Commit 58fd6750 authored by clean's avatar clean
Browse files

no message

parent 50c143c4
......@@ -1279,7 +1279,23 @@ void CallArrayFunction (SymbDef array_def,Bool is_jsr,StateP node_state_p)
StateP function_state_p;
fkind = (ArrayFunKind)array_def->sdef_arfun;
/* RWS ...
function_state_p = array_def->sdef_rule_type->rule_type_state_p;
*/
switch (array_def->sdef_kind)
{
case DEFRULE:
case SYSRULE:
function_state_p = array_def->sdef_rule_type->rule_type_state_p;
break;
case IMPRULE:
function_state_p = array_def->sdef_rule->rule_state_p;
break;
default:
error_in_function ("CallArrayFunction RWS");
break;
}
/* RWS */
if (function_state_p[0].state_type==SimpleState && function_state_p[0].state_object==UnknownObj){
StateS elem_state;
......
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