------- Comment #1 from deji_aking at yahoo dot ca  2008-10-27 22:31 -------
A simpler code (without cray pointers) as shown below also produces the errors.
...
      subroutine adw_set(G_nk)

      implicit none
      integer G_nk
      real*8 Adw_zbc_8(G_nk)
      integer Adw_fn_I(G_nk)

      Adw_zbc_8(1:G_nk) = transfer(-1,1.0)                            
      Adw_Fn_I (G_nk) = transfer(-1,1.0)

      return
      end
...


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37930

Reply via email to