20000412-1.f « compile « g77.f-torture « testsuite « gcc - maxim-kuvyrkov/gcc-pretty.git - [no description]

index : maxim-kuvyrkov/gcc-pretty.git

[no description]

about summary refs log tree commit diff

path: root/gcc/testsuite/g77.f-torture/compile/20000412-1.f

blob: e4c6511fa3b6c6a04f466fd261ec13a16c4d7883 (plain)

      subroutine aap(k)
      equivalence (i,r)
      i = k
      print*,r
      end