Go To Statement Considered Harmful: Fortran examples

Humor
6

I’ve wondered myself why aren’t jumps to named constructs supported. :person_shrugging:

The jump could go to any block construct including do, if, and select case:

return 

error_handler: if (warn)
   write(error_unit,*) "An error occured"
else
   error stop
end if error_handler