Function fortran_error_handler_begin