[flang] Accept polymorphic component element in storage_size
[llvm-project.git] / flang / test / Driver / wextra-ok.f90
blob48676e8e62aa718ae746bccd1cb99574a193b721
1 ! Ensure that supplying -Wextra into flang-new does not raise error
2 ! The first check should be changed if -Wextra is implemented
4 ! RUN: %flang -std=f2018 -Wextra %s -c 2>&1 | FileCheck %s --check-prefix=CHECK-OK
5 ! RUN: not %flang -std=f2018 -Wblah -Wextra %s -c 2>&1 | FileCheck %s --check-prefix=WRONG
7 ! CHECK-OK: The warning option '-Wextra' is not supported
8 ! WRONG: Only `-Werror` is supported currently.
10 program wextra_ok
11 end program wextra_ok