[Bug fortran/56132] New: Lengths incorrect on assignment to an allocatable character scalar.

[Bug fortran/56132] New: Lengths incorrect on assignment to an allocatable character scalar.

[jtappin at gmail dot com]

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

             Bug #: 56132
           Summary: Lengths incorrect on assignment to an allocatable
                    character scalar.
    Classification: Unclassified
           Product: gcc
           Version: 4.7.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: jtappin@gmail.com


Created attachment 29296
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=29296
Code demonstrating the problem

When I run the attached program with gfortran (4.7.2), the length appears to be
that of the previous assignment, e.g.:
./a.out 
String :_jjjj
           0 
           0 
String :_ssss
           0 
           4 ssss
String :_77
           4 ssss
           4 77  
String :_why does this happen
           4 77  
           2 wh

[Bug fortran/56132] Lengths incorrect on assignment to an allocatable character scalar.

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
      Known to work|                            |4.8.2, 4.9.0
         Resolution|---                         |FIXED
      Known to fail|                            |4.7.3

--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
ASAICT this is fixed in 4.8.2 and trunk (4.9.0):

[Book15] f90/bug% gfortran need_input/pr56132.f90
[Book15] f90/bug% a.out
String :_jjjj
           0 
           4 jjjj
String :_ssss
           4 jjjj
           4 ssss
String :_77 
           4 ssss
           2 77
String :_why does this happen
           2 77
           3 why
String :_''

[Book15] f90/bug% gfortran -v
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/sw64/lib/gcc4.8/libexec/gcc/x86_64-apple-darwin13.0.0/4.8.2/lto-wrapper
Target: x86_64-apple-darwin13.0.0
Configured with: ../gcc-4.8.2/configure --prefix=/sw64
--prefix=/sw64/lib/gcc4.8 --mandir=/sw64/share/man
--infodir=/sw64/lib/gcc4.8/info
--enable-languages=c,c++,fortran,lto,objc,obj-c++,java --with-gmp=/sw64
--with-libiconv-prefix=/sw64 --with-isl=/sw64 --with-cloog=/sw64
--with-mpc=/sw64 --with-system-zlib --x-includes=/usr/X11R6/include
--x-libraries=/usr/X11R6/lib --program-suffix=-fsf-4.8
Thread model: posix
gcc version 4.8.2 (GCC) 

Closing.