public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/60483] New: associate error on valid code: no IMPLICIT type
@ 2014-03-10 12:18 antony at cosmologist dot info
  2014-03-10 18:40 ` [Bug fortran/60483] [4.7/4.8/4.9 Regression] No IMPLICIT type error with: ASSOCIATE( X => derived_type() ) [i.e. w/ structure constructor] dominiq at lps dot ens.fr
                   ` (8 more replies)
  0 siblings, 9 replies; 10+ messages in thread
From: antony at cosmologist dot info @ 2014-03-10 12:18 UTC (permalink / raw)
  To: gcc-bugs

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

            Bug ID: 60483
           Summary: associate error on valid code: no IMPLICIT type
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: antony at cosmologist dot info

module A
    implicit none
    Type T
     integer :: val = 2
    contains
    final :: testfree
    end type
    contains

    subroutine testfree(this)
    Type(T) this

    print *,'freed'
    end subroutine

    subroutine Testf()

    associate(X => T())
        print *, X%val
    end associate
    print *,'after scope'
    end subroutine Testf

    end module


which gives

  print *, X%val
             1
Error: Symbol 'x' at (1) has no IMPLICIT type

(code checks if finalization is called correctly, but didn't get that far)
This code compiles in ifort.


^ permalink raw reply	[flat|nested] 10+ messages in thread
end of thread, other threads:[~2015-06-26 20:31 UTC | newest]

Thread overview: 10+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2014-03-10 12:18 [Bug fortran/60483] New: associate error on valid code: no IMPLICIT type antony at cosmologist dot info
2014-03-10 18:40 ` [Bug fortran/60483] [4.7/4.8/4.9 Regression] No IMPLICIT type error with: ASSOCIATE( X => derived_type() ) [i.e. w/ structure constructor] dominiq at lps dot ens.fr
2014-03-10 21:41 ` janus at gcc dot gnu.org
2014-03-31  8:57 ` rguenth at gcc dot gnu.org
2014-03-31  9:32 ` rguenth at gcc dot gnu.org
2014-06-12 13:49 ` [Bug fortran/60483] [4.7/4.8/4.9/4.10 " rguenth at gcc dot gnu.org
2014-12-19 13:33 ` [Bug fortran/60483] [4.8/4.9/5 " jakub at gcc dot gnu.org
2015-06-23  8:25 ` [Bug fortran/60483] [4.8/4.9/5/6 " rguenth at gcc dot gnu.org
2015-06-26 20:01 ` [Bug fortran/60483] [4.9/5/6 " jakub at gcc dot gnu.org
2015-06-26 20:31 ` jakub at gcc dot gnu.org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).