336 |
|
|
337 |
case OP_ni_format: |
case OP_ni_format: |
338 |
if ((*node)->type == OP_format |
if ((*node)->type == OP_format |
339 |
&& check_input_specifier (&(*node)->format.f, 0)) |
&& check_input_specifier (&(*node)->format.f, false) |
340 |
|
&& check_specifier_type (&(*node)->format.f, NUMERIC, false)) |
341 |
{ |
{ |
342 |
if (do_coercion) |
if (do_coercion) |
343 |
(*node)->type = OP_ni_format; |
(*node)->type = OP_ni_format; |
347 |
|
|
348 |
case OP_no_format: |
case OP_no_format: |
349 |
if ((*node)->type == OP_format |
if ((*node)->type == OP_format |
350 |
&& check_output_specifier (&(*node)->format.f, 0)) |
&& check_output_specifier (&(*node)->format.f, false) |
351 |
|
&& check_specifier_type (&(*node)->format.f, NUMERIC, false)) |
352 |
{ |
{ |
353 |
if (do_coercion) |
if (do_coercion) |
354 |
(*node)->type = OP_no_format; |
(*node)->type = OP_no_format; |
1100 |
} |
} |
1101 |
else |
else |
1102 |
{ |
{ |
1103 |
ds_create (&s, _("Function invocation ")); |
ds_puts (&s, _("Function invocation ")); |
1104 |
put_invocation (&s, func_name, args, arg_cnt); |
put_invocation (&s, func_name, args, arg_cnt); |
1105 |
ds_puts (&s, _(" does not match any known function. Candidates are:")); |
ds_puts (&s, _(" does not match any known function. Candidates are:")); |
1106 |
|
|
1107 |
for (f = first; f < last; f++) |
for (f = first; f < last; f++) |
1108 |
{ |
ds_printf (&s, "\n%s", f->prototype); |
|
ds_printf (&s, "\n%s", f->prototype); |
|
|
} |
|
1109 |
} |
} |
1110 |
ds_putc (&s, '.'); |
ds_putc (&s, '.'); |
1111 |
|
|