[Bug libfortran/61499] New: Internal read of negative integer broken in 4.9.0 on

[Bug libfortran/61499] New: Internal read of negative integer broken in 4.9.0 on

[krefson at gmail dot com]

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

            Bug ID: 61499
           Summary: Internal read of negative integer broken in 4.9.0 on
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: major
          Priority: P3
         Component: libfortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: krefson at gmail dot com

Created attachment 32933
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=32933&action=edit
Source for testcase

The attached file compiles bug gives erroneous results with fortran 4.9.0 and
4.9.1

gfortran -static-libgfortran -o internal2 internal2.f90
/usr/bin/ld: warning: -z ignore ignored.
/usr/bin/ld: warning: -z record ignored.
[kr@kohn gfortran-4.9.1]$ ./internal2
 Error: Bad integer for item 2 in list input

[kr@kohn gfortran-4.9.1]$ gfortran --version
GNU Fortran (GCC) 4.9.1 20140611 (prerelease)

Expected output (4.8.2)

 ./internal2.4.8.2
           1           1          -1           1          -1           1

Note that this is closely related to bug #61173. That bug is fixed in the above
version, but internal reads of integer data are still failing as in this case.

[Bug libfortran/61499] [4.9/410 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2014-06-13
                 CC|                            |jvdelisle at gcc dot gnu.org
           Assignee|unassigned at gcc dot gnu.org      |jvdelisle at gcc dot gnu.org
            Summary|Internal read of negative   |[4.9/410 Regression]
                   |integer broken in 4.9.0 on  |Internal read of negative
                   |                            |integer broken
     Ever confirmed|0                           |1
           Severity|major                       |normal

--- Comment #1 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Confirmed.  Regression

[Bug libfortran/61499] [4.9/410 Regression] Internal read of negative integer broken

[rguenth at gcc dot gnu.org]

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

Richard Biener <rguenth at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |4.9.1

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[pault at gcc dot gnu.org]

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

Paul Thomas <pault at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |burnus at gcc dot gnu.org,
                   |                            |pault at gcc dot gnu.org

--- Comment #2 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to Jerry DeLisle from comment #1)
> Confirmed.  Regression

Jerry - any progress on this? I am starting, with Tobias a triage of
regressions prior to the release of 4.9.1

Cheers

Paul

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[rguenth at gcc dot gnu.org]

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

Richard Biener <rguenth at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Priority|P3                          |P4

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

--- Comment #3 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Fri Jun 27 04:23:36 2014
New Revision: 212059

URL: https://gcc.gnu.org/viewcvs?rev=212059&root=gcc&view=rev
Log:
2014-06-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

    PR libgfortran/61499
    * io/list_read.c (eat_spaces): Use a 'for' loop instead of
    'while' loop to skip the loop if there are no bytes left in the
    string. Only seek if actual spaces can be skipped.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/list_read.c

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

--- Comment #4 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Fri Jun 27 04:26:51 2014
New Revision: 212060

URL: https://gcc.gnu.org/viewcvs?rev=212060&root=gcc&view=rev
Log:
2014-06-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

    PR libgfortran/61499
    gfortran.dg/arrayio_15.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/arrayio_15.f90
Modified:
    trunk/gcc/testsuite/ChangeLog

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

--- Comment #5 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Fri Jun 27 21:11:20 2014
New Revision: 212089

URL: https://gcc.gnu.org/viewcvs?rev=212089&root=gcc&view=rev
Log:
2014-06-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

    Backport from trunk.
    PR libgfortran/61499
    * io/list_read.c (eat_spaces): Use a 'for' loop instead of
    'while' loop to skip the loop if there are no bytes left in the
    string. Only seek if actual spaces can be skipped.

Modified:
    branches/gcc-4_9-branch/libgfortran/ChangeLog
    branches/gcc-4_9-branch/libgfortran/io/list_read.c

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

--- Comment #6 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Revision: 212060
Modified property: svn:log

Modified: svn:log at Fri Jun 27 21:34:33 2014
------------------------------------------------------------------------------
--- svn:log (original)
+++ svn:log Fri Jun 27 21:34:33 2014
@@ -1,4 +1,4 @@
 2014-06-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

     PR libgfortran/61499
-    gfortran.dg/arrayio_15.f90: New test.
+    * gfortran.dg/arrayio_15.f90: New test.

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

--- Comment #7 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Fri Jun 27 21:38:06 2014
New Revision: 212090

URL: https://gcc.gnu.org/viewcvs?rev=212090&root=gcc&view=rev
Log:
2014-06-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

    Backport from mainline.
    PR libgfortran/61499
    * gfortran.dg/arrayio_15.f90: New test.

Added:
    branches/gcc-4_9-branch/gcc/testsuite/gfortran.dg/arrayio_15.f90
Modified:
    branches/gcc-4_9-branch/gcc/testsuite/ChangeLog

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[pault at gcc dot gnu.org]

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

--- Comment #8 from Paul Thomas <pault at gcc dot gnu.org> ---
Hi Jerry,

Looks as if you did the business?

Maybe it should be closed.

Thanks

Paul

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[krefson at gmail dot com]

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

--- Comment #9 from Keith Refson <krefson at gmail dot com> ---
This fix checks out for the full code in context as well as the boiled-down
example. Happy for this to be closed.

[Bug libfortran/61499] [4.9/4.10 Regression] Internal read of negative integer broken

[jvdelisle at gcc dot gnu.org]

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

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|---                         |FIXED

--- Comment #10 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Fixed and Closing