eliminate compiler warning #422

Job	Run time
ci (tpb, ubuntu-22.04, --pb --threads --enable-libffi, test-some-fast)	30m 25s
ci (a6osx, macos-13)	15m 10s
ci (ta6osx, macos-13)	18m 41s
ci (arm64osx, macos-14)	9m 2s
ci (tarm64osx, macos-14)	12m 15s
ci (i3le, ubuntu-22.04)	12m 52s
ci (ti3le, ubuntu-22.04)	16m 19s
ci (a6le, ubuntu-22.04)	9m 45s
ci (ta6le, ubuntu-22.04, CFLAGS+=-std=gnu89)	12m 12s
ci (ta6le, ubuntu-22.04, reboot, -m=ta6le --force, re.boot SCHEME="chezscheme", test-some-fast)	8m 35s
ci (i3nt, windows-2022, vs)	12m 21s
ci (ti3nt, windows-2022, vs)	15m 13s
ci (a6nt, windows-2022, vs)	12m 13s
ci (ta6nt, windows-2022, vs)	15m 10s
ci (ta6nt, windows-2022, gcc, CFLAGS+=-std=gnu89)	13m 7s
ci (ta6le, ubuntu-22.04, test-more, more)	58m 55s
	4h 32m 15s

Provide feedback