No need to return after stop

This commit is contained in:
Paolo Giannozzi 2025-06-26 17:39:13 +02:00
parent cbc58ff224
commit 3bc8e73fa3
1 changed files with 1 additions and 3 deletions

View File

@ -61,7 +61,7 @@ SUBROUTINE errore( calling_routine, message, ierr )
CALL ptrace()
#endif
#endif
!
!
! .. write the message to a file and close it before exiting
! .. this will prevent loss of information on systems that
! .. do not flush the open streams
@ -91,8 +91,6 @@ SUBROUTINE errore( calling_routine, message, ierr )
!
STOP 1
!
RETURN
!
END SUBROUTINE errore
!
!----------------------------------------------------------------------