Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/main
/
.
/
test
/
Evaluate
/
folding31.f90
blob: 6b1682b1ee25c1f9c7ae6206223d0147da0b3dba [
file
] [
log
] [
blame
]
!
RUN
:
%
python
%
S
/
test_folding
.
py
%
s
%
flang_fc1
!
Test
folding of character array conversion
.
module
m
character
(*,
4
),
parameter
::
str4arr
(
1
)
=
[
'a'
]
logical
,
parameter
::
test
=
str4arr
(
1
)
==
4
_
'a'
end