/* copy the text of the actual parameter
into the replacement text
*/
- for (p = actpars[n - 1]; p && *p; p++) {
+ for (p = actpars[n - 1]; *p; p++) {
text[pos++] = *p;
if (pos == size)
text = Srealloc(text, size += RTEXTSIZE);
/* argument mismatch: too many or too few
actual parameters.
*/
- error("argument mismatch, %s", idef->id_text);
+ warning("argument mismatch, %s", idef->id_text);
while (++nr_of_params < acnt) {
/* too few paraeters: remaining actuals are ""
*/
- actparams[nr_of_params] = (char *) 0;
+ actparams[nr_of_params] = "";
}
}