fix function prototypes #503

Job	Run time
cross_build (mips64el, mips64el-linux-gnuabi64, DYNAMIC_ARCH=1 TARGET=GENERIC)	6m 23s
build (ubuntu-latest, gfortran, cmake)	14m 7s
cross_build (riscv64, riscv64-linux-gnu, TARGET=RISCV64_GENERIC)	3m 40s
msys2 (MINGW64, int32, Release)	20m 19s
cross_build (mipsel, mipsel-linux-gnu, TARGET=MIPS1004K)	6m 44s
build (ubuntu-latest, gfortran, make)	7m 27s
msys2 (MINGW64, int64, Release)	19m 23s
cross_build (alpha, alpha-linux-gnu, TARGET=EV4)	3m 32s
build (ubuntu-latest, flang, cmake)	14m 22s
msys2 (MINGW32, int32, Release)	17m 54s
build (ubuntu-latest, flang, make)	8m 0s
msys2 (CLANG64, int32, Release)	23m 32s
build (macos-latest, gfortran, cmake)	36m 45s
msys2 (CLANG64, int64, Release)	24m 11s
build (macos-latest, gfortran, make)	10m 56s
msys2 (CLANG32, int32, Release)	12m 59s
msys2 (MINGW64, int32, None, mingw-w64-x86_64, fc)	17m 18s
	4h 7m 32s

Provide feedback