public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/95829] New: Bogus error with additional blanks in type(*)
@ 2020-06-22 20:23 gscfq@t-online.de
  2020-06-22 23:31 ` [Bug fortran/95829] " kargl at gcc dot gnu.org
                   ` (5 more replies)
  0 siblings, 6 replies; 7+ messages in thread
From: gscfq@t-online.de @ 2020-06-22 20:23 UTC (permalink / raw)
  To: gcc-bugs

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

            Bug ID: 95829
           Summary: Bogus error with additional blanks in type(*)
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Affects versions down to at least r5 :


$ cat z1.f90
subroutine s(x)
   type( * ) :: x
end


$ cat z2.f90
subroutine s (a, b, c, d, e, f, g)
   type(*) :: a
   type(* ) :: b
   type( *) :: c
   type( * ) :: d
   type(*  ) :: e
   type(  *) :: f
   type(  *  ) :: g
end


$ gfortran-11-20200621 -c z1.f90
z1.f90:2:4:

    2 |    type( * ) :: x
      |    1
Error: Unclassifiable statement at (1)

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
@ 2020-06-22 23:31 ` kargl at gcc dot gnu.org
  2020-07-01  9:14 ` cvs-commit at gcc dot gnu.org
                   ` (4 subsequent siblings)
  5 siblings, 0 replies; 7+ messages in thread
From: kargl at gcc dot gnu.org @ 2020-06-22 23:31 UTC (permalink / raw)
  To: gcc-bugs

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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Priority|P3                          |P4
                 CC|                            |kargl at gcc dot gnu.org
   Last reconfirmed|                            |2020-06-22
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |NEW

--- Comment #1 from kargl at gcc dot gnu.org ---
Index: gcc/fortran/decl.c
===================================================================
--- gcc/fortran/decl.c  (revision 280157)
+++ gcc/fortran/decl.c  (working copy)
@@ -4069,7 +4069,7 @@ gfc_match_decl_type_spec (gfc_typespec *ts, int implic
       gfc_gobble_whitespace ();
       if (gfc_peek_ascii_char () == '*')
        {
-         if ((m = gfc_match ("*)")) != MATCH_YES)
+         if ((m = gfc_match ("* ) ")) != MATCH_YES)
            return m;
          if (gfc_comp_struct (gfc_current_state ()))
            {

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
  2020-06-22 23:31 ` [Bug fortran/95829] " kargl at gcc dot gnu.org
@ 2020-07-01  9:14 ` cvs-commit at gcc dot gnu.org
  2020-07-01 10:23 ` cvs-commit at gcc dot gnu.org
                   ` (3 subsequent siblings)
  5 siblings, 0 replies; 7+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-07-01  9:14 UTC (permalink / raw)
  To: gcc-bugs

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

--- Comment #2 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Mark Eggleston
<markeggleston@gcc.gnu.org>:

https://gcc.gnu.org/g:624e60f080989fa57756575a0bb47a97748b52b8

commit r11-1753-g624e60f080989fa57756575a0bb47a97748b52b8
Author: Mark Eggleston <markeggleston@gcc.gnu.org>
Date:   Tue Jun 23 11:01:28 2020 +0100

    Fortran  : Bogus error with additional blanks in type(*) PR95829

    Checking for "* ) " instead of "*)" clears the bogus error.

    2020-07-01  Steven G. Kargl  <kargl@gcc.gnu.org>

    gcc/fortran/

            PR fortran/95829
            * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
            of "*)".

    2020-07-01  Mark Eggleston  <markeggleston@gcc.gnu.org>

    gcc/testsuite/

            PR fortran/95829
            * gfortran.dg/pr95829.f90: New test.

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
  2020-06-22 23:31 ` [Bug fortran/95829] " kargl at gcc dot gnu.org
  2020-07-01  9:14 ` cvs-commit at gcc dot gnu.org
@ 2020-07-01 10:23 ` cvs-commit at gcc dot gnu.org
  2020-07-01 12:10 ` cvs-commit at gcc dot gnu.org
                   ` (2 subsequent siblings)
  5 siblings, 0 replies; 7+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-07-01 10:23 UTC (permalink / raw)
  To: gcc-bugs

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

--- Comment #3 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-10 branch has been updated by Mark Eggleston
<markeggleston@gcc.gnu.org>:

https://gcc.gnu.org/g:e025298cfcb1aae9d3ff674cdc1c4fb271cb2bdd

commit r10-8405-ge025298cfcb1aae9d3ff674cdc1c4fb271cb2bdd
Author: Mark Eggleston <markeggleston@gcc.gnu.org>
Date:   Tue Jun 23 11:01:28 2020 +0100

    Fortran  : Bogus error with additional blanks in type(*) PR95829

    Checking for "* ) " instead of "*)" clears the bogus error.

    2020-07-01  Steven G. Kargl  <kargl@gcc.gnu.org>

    gcc/fortran/

            PR fortran/95829
            * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
            of "*)".

    2020-07-01  Mark Eggleston  <markeggleston@gcc.gnu.org>

    gcc/testsuite/

            PR fortran/95829
            * gfortran.dg/pr95829.f90: New test.

    (cherry picked from commit 624e60f080989fa57756575a0bb47a97748b52b8)

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
                   ` (2 preceding siblings ...)
  2020-07-01 10:23 ` cvs-commit at gcc dot gnu.org
@ 2020-07-01 12:10 ` cvs-commit at gcc dot gnu.org
  2020-07-01 13:08 ` cvs-commit at gcc dot gnu.org
  2020-07-01 13:09 ` markeggleston at gcc dot gnu.org
  5 siblings, 0 replies; 7+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-07-01 12:10 UTC (permalink / raw)
  To: gcc-bugs

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

--- Comment #4 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-9 branch has been updated by Mark Eggleston
<markeggleston@gcc.gnu.org>:

https://gcc.gnu.org/g:a833478ca9898fe287ad423e5af8462938886758

commit r9-8710-ga833478ca9898fe287ad423e5af8462938886758
Author: Mark Eggleston <markeggleston@gcc.gnu.org>
Date:   Tue Jun 23 11:01:28 2020 +0100

    Fortran  : Bogus error with additional blanks in type(*) PR95829

    Checking for "* ) " instead of "*)" clears the bogus error.

    2020-07-01  Steven G. Kargl  <kargl@gcc.gnu.org>

    gcc/fortran/

            PR fortran/95829
            * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
            of "*)".

    2020-07-01  Mark Eggleston  <markeggleston@gcc.gnu.org>

    gcc/testsuite/

            PR fortran/95829
            * gfortran.dg/pr95829.f90: New test.

    (cherry picked from commit 624e60f080989fa57756575a0bb47a97748b52b8)

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
                   ` (3 preceding siblings ...)
  2020-07-01 12:10 ` cvs-commit at gcc dot gnu.org
@ 2020-07-01 13:08 ` cvs-commit at gcc dot gnu.org
  2020-07-01 13:09 ` markeggleston at gcc dot gnu.org
  5 siblings, 0 replies; 7+ messages in thread
From: cvs-commit at gcc dot gnu.org @ 2020-07-01 13:08 UTC (permalink / raw)
  To: gcc-bugs

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

--- Comment #5 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-8 branch has been updated by Mark Eggleston
<markeggleston@gcc.gnu.org>:

https://gcc.gnu.org/g:88b44ed719378a52e001a474bcf963ea4c4841b1

commit r8-10337-g88b44ed719378a52e001a474bcf963ea4c4841b1
Author: Mark Eggleston <markeggleston@gcc.gnu.org>
Date:   Tue Jun 23 11:01:28 2020 +0100

    Fortran  : Bogus error with additional blanks in type(*) PR95829

    Checking for "* ) " instead of "*)" clears the bogus error.

    2020-07-01  Steven G. Kargl  <kargl@gcc.gnu.org>

    gcc/fortran/

            PR fortran/95829
            * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
            of "*)".

    2020-07-01  Mark Eggleston  <markeggleston@gcc.gnu.org>

    gcc/testsuite/

            PR fortran/95829
            * gfortran.dg/pr95829.f90: New test.

    (cherry picked from commit 624e60f080989fa57756575a0bb47a97748b52b8)

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

* [Bug fortran/95829] Bogus error with additional blanks in type(*)
  2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
                   ` (4 preceding siblings ...)
  2020-07-01 13:08 ` cvs-commit at gcc dot gnu.org
@ 2020-07-01 13:09 ` markeggleston at gcc dot gnu.org
  5 siblings, 0 replies; 7+ messages in thread
From: markeggleston at gcc dot gnu.org @ 2020-07-01 13:09 UTC (permalink / raw)
  To: gcc-bugs

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

markeggleston at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
                 CC|                            |markeggleston at gcc dot gnu.org
         Resolution|---                         |FIXED

--- Comment #6 from markeggleston at gcc dot gnu.org ---
Committed to master and backported.

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

end of thread, other threads:[~2020-07-01 13:09 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-06-22 20:23 [Bug fortran/95829] New: Bogus error with additional blanks in type(*) gscfq@t-online.de
2020-06-22 23:31 ` [Bug fortran/95829] " kargl at gcc dot gnu.org
2020-07-01  9:14 ` cvs-commit at gcc dot gnu.org
2020-07-01 10:23 ` cvs-commit at gcc dot gnu.org
2020-07-01 12:10 ` cvs-commit at gcc dot gnu.org
2020-07-01 13:08 ` cvs-commit at gcc dot gnu.org
2020-07-01 13:09 ` markeggleston 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).