diff options
author | Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> | 2025-04-13 12:46:31 +0200 |
---|---|---|
committer | Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> | 2025-04-13 12:46:31 +0200 |
commit | 45e93925beaf67ba99c67f78bd9771cacd316853 (patch) | |
tree | 72f77bd5b748da57589d1fd902ebe211b0013019 | |
parent | f40e39515e0b7fa69bd50bad99f1f1b8c446692f (diff) | |
download | gcc-45e93925beaf67ba99c67f78bd9771cacd316853.zip gcc-45e93925beaf67ba99c67f78bd9771cacd316853.tar.gz gcc-45e93925beaf67ba99c67f78bd9771cacd316853.tar.bz2 |
libgcobol: Use strchr instead of index
valconf.cc doesn't compile on Solaris:
cobol/valconv.cc: In function ‘bool __gg__string_to_numeric_edited(char*, char*, int, int, const char*)’:
cobol/valconv.cc:856:40: error: ‘index’ was not declared in this scope; did you mean ‘Rindex’?
856 | const char *decimal_location = index(dest, __gg__decimal_point); | ^~~~~
| Rindex
On Solaris, it's only declared in <strings.h>. While one could get that
included, it's way easier to just use strchr as is already the case in
other instances.
Bootstrapped without regressions on amd64-pc-solaris2.11,
sparcv9-sun-solaris2.11, and x86_64-pc-linux-gnu.
2025-04-08 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
libgcobol:
* valconv.cc (__gg__string_to_numeric_edited): Use strchr instead
of index.
-rw-r--r-- | libgcobol/valconv.cc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libgcobol/valconv.cc b/libgcobol/valconv.cc index 33d9a0d..7e58301 100644 --- a/libgcobol/valconv.cc +++ b/libgcobol/valconv.cc @@ -853,14 +853,14 @@ got_float: } else { - const char *decimal_location = index(dest, __gg__decimal_point); + const char *decimal_location = strchr(dest, __gg__decimal_point); if( !decimal_location ) { - decimal_location = index(dest, ascii_v); + decimal_location = strchr(dest, ascii_v); } if( !decimal_location ) { - decimal_location = index(dest, ascii_V); + decimal_location = strchr(dest, ascii_V); } if( !decimal_location ) { |