cobol: Avoid a use of auto.

In this case the deduction for Darwin's implementation is 'char *' which
then conflicts with the second use of data.initial in the find_if
callback.  Let's just specify it as 'const char *'.

gcc/cobol/ChangeLog:

	* util.cc (cbl_field_t::report_invalid_initial_value): Avoid
	auto here and specify const char *.

Signed-off-by: Iain Sandoe <iain@sandoe.co.uk>
This commit is contained in:
Iain Sandoe 2025-03-17 10:04:52 +00:00
parent cfbabe10dd
commit 2688450450

View file

@ -850,7 +850,7 @@ cbl_field_t::report_invalid_initial_value(const YYLTYPE& loc) const {
/*
* Check fraction for excess precision
*/
auto p = strchr(data.initial, symbol_decimal_point());
const char *p = strchr(data.initial, symbol_decimal_point());
if( p ) {
auto pend = std::find(p, p + strlen(p), 0x20);
int n = std::count_if( ++p, pend, isdigit );