xref: /llvm-project/flang/test/Semantics/realkinds-aarch64-01.f90 (revision 3b19e480c056a35a60e3c65de476b6097329ceac)
1! REQUIRES: aarch64-registered-target
2! REQUIRES: flang-supports-f128-math
3! RUN: %python %S/test_modfile.py %s %flang_fc1 -triple aarch64-unknown-linux-gnu
4
5module m1
6  logical, parameter :: realpcheck = 16 == selected_real_kind(16)
7end module m1
8!Expect: m1.mod
9!module m1
10!logical(4),parameter::realpcheck=.true._4
11!intrinsic::selected_real_kind
12!end
13