I just want to know if the return
statement in Fortran 2008 is obsolete, because it seems to be unnecessary to write it at the end of subroutines and functions.
Does it have some other utility?
I just want to know if the return
statement in Fortran 2008 is obsolete, because it seems to be unnecessary to write it at the end of subroutines and functions.
Does it have some other utility?
No, it is not obsolete.
It is used to exit a subroutine and a function. Whenever you want to exit in the middle of a subroutine, you use RETURN
. For example, when some error happens or similar.
Using RETURN
is an alternative to long IF
conditions like:
if (no_error) then
[...a lot of code...]
end if
Instead you just do:
if (error) return
[...a lot of code...]
As well as being able to complete execution of a function or subroutine at any point, rather than just before the end, the return
statement may (currently) be used to give alternate return:
return 2
Alternate return is obsolete and soon to be deleted, but is something in Fortran 2008 that doesn't happen without return
.
It is not obsolete but it seems optional, as I have seem programs compile and run without it. (Using ifort)
end
so all statements are optional. –
Headspring © 2022 - 2024 — McMap. All rights reserved.
lot of code... return end
. And I thoughtreturn
was something necessary to write, but found it is not. – Saw