flang/test/Semantics/altreturn05.f90

   1 ! RUN: %S/test_errors.sh %s %t %flang_fc1
   2 ! REQUIRES: shell
   3 ! Test extension: RETURN from main program
   4
   5 return !ok
   6 !ERROR: RETURN with expression is only allowed in SUBROUTINE subprogram
   7 return 0
   8 end