Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/main
/
.
/
test
/
Semantics
/
modfile56.f90
blob: 9f15e64f9a6e99e2b4a4feabe516c5bde2a35bbf [
file
] [
log
] [
blame
]
!
RUN
:
%
python
%
S
/
test_modfile
.
py
%
s
%
flang_fc1
!
Named
constant array
with
non
-
default
lower bound
module
m
real
,
parameter
::
x
(
0
:
0
)
=
[
0.
]
end
!
Expect
:
m
.
mod
!
module
m
!
real
(
4
),
parameter
::
x
(
0_8
:
0_8
)=[
REAL
(
4
)::
0.
_4
]
!
end