fix symbol naming (underscoring) #6080

Job	Run time
neoverse_build	7m 51s
cross_build (mipsel, mipsel-linux-gnu, TARGET=MIPS1004K)	3m 59s
cross_build (mips64el, mips64el-linux-gnuabi64, DYNAMIC_ARCH=1 TARGET=GENERIC)	5m 3s
cross_build (alpha, alpha-linux-gnu, TARGET=EV4)	3m 0s
msys2 (CLANG64, int64, Release)	1h 15m 50s
cross_build (riscv64, riscv64-linux-gnu, TARGET=RISCV64_GENERIC)	2m 44s
msys2 (MINGW32, int32, Release)	17m 16s
build (ubuntu-latest, gfortran, make)	21m 34s
msys2 (CLANG64, int32, Release)	1h 17m 2s
msys2 (UCRT64, int32, None, mingw-w64-ucrt-x86_64, fc)	12m 54s
build (ubuntu-latest, flang, cmake)	11m 43s
build (macos-latest, gfortran, cmake)	37m 21s
build (ubuntu-latest, gfortran, cmake)	45m 22s
msys2 (UCRT64, int32, Release)	16m 17s
msys2 (UCRT64, int64, Release)	17m 20s
build (macos-latest, gfortran, make)	11m 12s
build (ubuntu-latest, flang, make)	23m 21s
	6h 29m 49s

Provide feedback