For negative argument the result value was not assigned.
assigned to @certik
Before it was failing on Apple M1 with gfortran, the function was returning 0 instead of -4. I assume in Docker and on Linux/Intel the test passed, because the return register happened to already contain the correct value by accident.
added 1 commit
Compare with previous version
mentioned in commit f5dae550
merged
