mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-17 03:56:42 +00:00
96d229c9ab
This patch adds the following compiler frontend driver options: * -fdebug-unparse (f18 spelling: -funparse) * -fdebug-unparse-with-symbols (f18 spelling: -funparse-with-symbols) The new driver will only accept the new spelling. `f18` will accept both the original and the new spelling. A new base class for frontend actions is added: `PrescanAndSemaAction`. This is added to reduce code duplication that otherwise these new options would lead to. Implementation from * `ParseSyntaxOnlyAction::ExecutionAction` is moved to: * `PrescanAndSemaAction::BeginSourceFileAction` This implementation is now shared between: * PrescanAndSemaAction * ParseSyntaxOnlyAction * DebugUnparseAction * DebugUnparseWithSymbolsAction All tests that don't require other yet unimplemented options are updated. This way `flang-new -fc1` is used instead of `f18` when `FLANG_BUILD_NEW_DRIVER` is set to `On`. In order to facilitate this, `%flang_fc1` is added in the LIT configuration (lit.cfg.py). `asFortran` from f18.cpp is duplicated as `getBasicAsFortran` in FrontendOptions.cpp. At this stage it's hard to find a good place to share this method. I suggest that we revisit this once a switch from `f18` to `flang-new` is complete. Differential Revision: https://reviews.llvm.org/D96483
33 lines
561 B
Fortran
33 lines
561 B
Fortran
! RUN: %flang_fc1 -fdebug-unparse-with-symbols %s 2>&1 | FileCheck %s
|
|
! CHECK-NOT: Control flow escapes from CRITICAL
|
|
|
|
subroutine test1(a, i)
|
|
integer i
|
|
real a(10)
|
|
critical
|
|
if (a(i) < 0.0) then
|
|
a(i) = 20.20
|
|
goto 20
|
|
end if
|
|
20 a(i) = -a(i)
|
|
end critical
|
|
end subroutine test1
|
|
|
|
subroutine test2(i)
|
|
integer i
|
|
critical
|
|
if (i) 10, 10, 20
|
|
10 i = i + 1
|
|
20 i = i - 1
|
|
end critical
|
|
end subroutine test2
|
|
|
|
subroutine test3(i)
|
|
integer i
|
|
critical
|
|
goto (10, 10, 20) i
|
|
10 i = i + 1
|
|
20 i = i - 1
|
|
end critical
|
|
end subroutine test3
|