ABORT — 프로그램 즉시 종료

프로그램이 도중에 멈췄으면 좋겠을 때가 있어요. 복구할 수 없는 상황을 만나서 곧바로 실행을 끝내고 싶을 때 ABORT를 쓰면 됩니다. 단순히 종료만 하는 게 아니라, 디버깅에 도움이 되는 정보를 남겨준다는 점이 특징이에요.

출처: gfortran 공식 문서 - ABORT

본문

CALL ABORT

ABORT는 프로그램을 즉시 종료시켜요. 코어 덤프(core dump)를 지원하는 운영체제에서는 종료와 함께 코어 덤프를 생성하고, 컴파일할 때 -fno-backtrace를 주지 않았다면 백트레이스(backtrace)도 출력해 줍니다.

서브루틴(Subroutine)

반환하지 않아요. ABORT는 실행 흐름을 되돌려주지 않고 프로그램을 끝내 버립니다.

program test_abort
  integer :: i = 1, j = 2
  if (i /= j) call abort
end program test_abort

i와 j의 값이 다르면 abort를 호출해서 프로그램을 바로 종료하는 간단한 예시예요.

GNU 확장(GNU extension)