Cross Reference: /ast/src/lib/libexpr/Oexparse.c

Lines Matching refs:procedure
995 				if (expr.procedure)
998 				expr.procedure = exvsp[-1].id->value = exnewnode(expr.program, PROCEDURE, 1, exvsp[-1].id->type, NiL, NiL);
999 				expr.procedure->type = INTEGER;
1005 					if (!(expr.procedure->data.procedure.frame = dtopen(disc, Dtset)) || !dtview(expr.procedure->data.procedure.frame, expr.program->symbols))
1007 					expr.program->symbols = expr.program->frame = expr.procedure->data.procedure.frame;
1014 			expr.procedure = 0;
1185 				if (expr.procedure && !expr.procedure->type)
1187 				exvsp[-1].expr = excast(expr.program, exvsp[-1].expr, expr.procedure ? expr.procedure->type : INTEGER, NiL, 0);
1674 			exval.expr->data.call.procedure = exvsp[-3].id;
1981 			expr.procedure->data.procedure.arity++;
2031 				if (expr.procedure)
2033 				expr.procedure = exnewnode(expr.program, PROCEDURE, 1, expr.declare, NiL, NiL);
2039 					if (!(expr.procedure->data.procedure.frame = dtopen(disc, Dtset)) || !dtview(expr.procedure->data.procedure.frame, expr.program->symbols))
2041 					expr.program->symbols = expr.program->frame = expr.procedure->data.procedure.frame;
2051 				expr.id->type = expr.procedure->type;
2059 			exval.expr = expr.procedure;
2060 			expr.procedure = 0;
2071 			 * NOTE: procedure definition was slipped into the