repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
[AArch64] Merge stores of D-register values with different modes
[official-gcc.git]
/
gcc
/
testsuite
/
gfortran.dg
/
pr49540-2.f90
blob
f9a3d6df68db0ddab5458bb9aa7f0e42e38c40b1
1
! PR fortran/49540
2
! { dg-do compile }
3
! { dg-options "" }
4
block
data
5
common
/
a
/
i
(
5
,
5
)
6
data
i
/
4
,
23
*
5
,
6
/
7
data
i
(:,
2
) /
1
,
3
*
2
,
3
/
8
common
/
b
/
j
(
5
,
5
)
9
data
j
(
2
,:) /
1
,
3
*
2
,
3
/
10
data
j
/
4
,
23
*
5
,
6
/
11
common
/
c
/
k
(
5
,
5
)
12
data
k
(:,
2
) /
1
,
3
*
2
,
3
/
13
data
k
/
4
,
23
*
5
,
6
/
14
common
/
d
/
l
(
5
,
5
)
15
data
l
/
4
,
23
*
5
,
6
/
16
data
l
(
2
,:) /
1
,
3
*
2
,
3
/
17
end
block
data