summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/g77/12002.f
blob: 0cb29c7549e773cce6b76ab1e6b4e27b69d793bd (plain)
1
2
3
4
5
6
C      PR middle-end/12002
C { dg-do compile }
       COMPLEX TE1
       TE1=-2.
       TE1=TE1+TE1
       END