public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/100972] New: Missing error with "implicit none (external)"
@ 2021-06-08 17:17 gscfq@t-online.de
  2021-06-09 16:30 ` [Bug fortran/100972] " gscfq@t-online.de
                   ` (4 more replies)
  0 siblings, 5 replies; 6+ messages in thread
From: gscfq@t-online.de @ 2021-06-08 17:17 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

            Bug ID: 100972
           Summary: Missing error with "implicit none (external)"
           Product: gcc
           Version: 12.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

In the following example function g has no known interface and is
not declared external. implicit none (external) does not catch it.
Affects versions down to at least r5.


$ cat z1.f90
program p
   implicit none (external)
   real, external :: f
   real :: a, b
   a = f()
   b = g()
end


$ gfortran-12-20210606 -c z1.f90
$

BTW, ifort/ifx 2021.2 gets it right with
error #8889: Explicit declaration of the EXTERNAL attribute is required. [G]

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/100972] Missing error with "implicit none (external)"
  2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
@ 2021-06-09 16:30 ` gscfq@t-online.de
  2021-10-31 17:36 ` aldot at gcc dot gnu.org
                   ` (3 subsequent siblings)
  4 siblings, 0 replies; 6+ messages in thread
From: gscfq@t-online.de @ 2021-06-09 16:30 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

--- Comment #1 from G. Steinmetz <gscfq@t-online.de> ---

Similarly, the helpful option -Wimplicit-procedure does not warn :
(-Wimplicit-procedure : Warn if a procedure is called that has neither
an explicit interface nor has been declared as EXTERNAL.)

$ gfortran-12-20210606 -c z1.f90 -Wimplicit-procedure
$

And the following error message refers to "IMPORT" :

$ _g2_v12test -c z1.f90 -std=f2008
z1.f90:2:19:

    2 |    implicit none (external)
      |                   1
Error: Fortran 2018: IMPORT NONE with spec list at (1)

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/100972] Missing error with "implicit none (external)"
  2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
  2021-06-09 16:30 ` [Bug fortran/100972] " gscfq@t-online.de
@ 2021-10-31 17:36 ` aldot at gcc dot gnu.org
  2021-11-05 21:10 ` cvs-commit at gcc dot gnu.org
                   ` (2 subsequent siblings)
  4 siblings, 0 replies; 6+ messages in thread
From: aldot at gcc dot gnu.org @ 2021-10-31 17:36 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

Bernhard Reutner-Fischer <aldot at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever confirmed|0                           |1
           Keywords|                            |patch
   Last reconfirmed|                            |2021-10-31
                 CC|                            |aldot at gcc dot gnu.org
                URL|                            |https://gcc.gnu.org/piperma
                   |                            |il/gcc-patches/2021-October
                   |                            |/582979.html

--- Comment #2 from Bernhard Reutner-Fischer <aldot at gcc dot gnu.org> ---
Confirmed

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/100972] Missing error with "implicit none (external)"
  2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
  2021-06-09 16:30 ` [Bug fortran/100972] " gscfq@t-online.de
  2021-10-31 17:36 ` aldot at gcc dot gnu.org
@ 2021-11-05 21:10 ` cvs-commit at gcc dot gnu.org
  2022-11-15  7:36 ` aldot at gcc dot gnu.org
  2022-11-28 22:20 ` pinskia at gcc dot gnu.org
  4 siblings, 0 replies; 6+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2021-11-05 21:10 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

--- Comment #3 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Bernhard Reutner-Fischer
<aldot@gcc.gnu.org>:

https://gcc.gnu.org/g:1727bb533ede295a3ef2dd494225d27b6d1746aa

commit r12-4961-g1727bb533ede295a3ef2dd494225d27b6d1746aa
Author: Bernhard Reutner-Fischer <aldot@gcc.gnu.org>
Date:   Sun Oct 31 17:44:45 2021 +0100

    Fortran: Missing error with IMPLICIT none (external) [PR100972]

    gcc/fortran/ChangeLog:

            PR fortran/100972
            * decl.c (gfc_match_implicit_none): Fix typo in warning.
            * resolve.c (resolve_unknown_f): Reject external procedures
            without explicit EXTERNAL attribute whe IMPLICIT none (external)
            is in effect.

    gcc/testsuite/ChangeLog:

            PR fortran/100972
            * gfortran.dg/implicit_14.f90: Adjust error.
            * gfortran.dg/external_implicit_none_3.f08: New test.

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/100972] Missing error with "implicit none (external)"
  2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
                   ` (2 preceding siblings ...)
  2021-11-05 21:10 ` cvs-commit at gcc dot gnu.org
@ 2022-11-15  7:36 ` aldot at gcc dot gnu.org
  2022-11-28 22:20 ` pinskia at gcc dot gnu.org
  4 siblings, 0 replies; 6+ messages in thread
From: aldot at gcc dot gnu.org @ 2022-11-15  7:36 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

Bernhard Reutner-Fischer <aldot at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|---                         |FIXED
      Known to work|                            |12.1.0

--- Comment #4 from Bernhard Reutner-Fischer <aldot at gcc dot gnu.org> ---
Fixed for 12.1.0 onwards.

^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/100972] Missing error with "implicit none (external)"
  2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
                   ` (3 preceding siblings ...)
  2022-11-15  7:36 ` aldot at gcc dot gnu.org
@ 2022-11-28 22:20 ` pinskia at gcc dot gnu.org
  4 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu.org @ 2022-11-28 22:20 UTC (permalink / raw)
  To: gcc-bugs

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100972

Andrew Pinski <pinskia at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |12.0

^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2022-11-28 22:20 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-06-08 17:17 [Bug fortran/100972] New: Missing error with "implicit none (external)" gscfq@t-online.de
2021-06-09 16:30 ` [Bug fortran/100972] " gscfq@t-online.de
2021-10-31 17:36 ` aldot at gcc dot gnu.org
2021-11-05 21:10 ` cvs-commit at gcc dot gnu.org
2022-11-15  7:36 ` aldot at gcc dot gnu.org
2022-11-28 22:20 ` pinskia 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).