namelist tests are failing...

Andreas Jaeger aj@suse.de
Sat Nov 26 17:08:00 GMT 2005


On Sat, Nov 26, 2005 at 07:45:06AM -0800, Steve Kargl wrote:
> On Sat, Nov 26, 2005 at 03:38:57PM +0100, Andreas Jaeger wrote:
> > 
> > Running namelist_12.f under gdb gives the following backtrace:
> > 
> > Program received signal SIGABRT, Aborted.
> > 0x00002aaaaafff43a in raise () from /lib64/tls/libc.so.6
> > (gdb) bt
> > #0  0x00002aaaaafff43a in raise () from /lib64/tls/libc.so.6
> > #1  0x00002aaaab000870 in abort () from /lib64/tls/libc.so.6
> > #2  0x00002aaaaac27fee in _gfortran_abort () at /cvs/gcc-svn/trunk/libgfortran/intrinsics/abort.c:39
> > #3  0x0000000000401415 in MAIN__ () at /cvs/gcc-svn/trunk/gcc/testsuite/gfortran.dg/namelist_12.f:54
> > #4  0x000000000040142e in main (argc=<value optimized out>, argv=<value optimized out>) at /cvs/gcc-svn/trunk/libgfortran/fmain.c:18
> > 
> > So, line 54 gives an error, the line is:
> >     54       if (xx.ne.42) call abort ()
> >  
> > xx has a content of 0 at this line,
> > 
> > If I compile the program with -m32, it succeeds, so only the 64-bit
> > program is broken.
> > 
> 
> There were only two commits concerning namelist in the last
> few days.  Can you revert these changes to see which may
> be the guilty party? 
> 
> 2005-11-25  Richard Henderson  <rth@redhat.com>
> 
>         * io/list_read.c (nml_parse_qualifier): Use memcpy to extract
>         values from dtp->u.p.value.
>         * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item,
>         seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag,
>         input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to
>         single-bit fields.  Move value to where it'll be at least pointer
>         aligned.

This seems to be the culprit, going back in libgfortran before this patch, I see
no failures anymore.

Andreas
> 
> 
> 2005-11-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
> 
>         PR libgfortran/24794
>         * io/list_read.c (read_character): Add auto completion on short
>         namelist reads.
> 
> 
> 
> 
> -- 
> Steve

-- 
 Andreas Jaeger, aj@suse.de, http://www.suse.de/~aj
  SUSE LINUX Products GmbH, Maxfeldstr. 5, 90409 N�rnberg, Germany
   GPG fingerprint = 93A3 365E CE47 B889 DF7F  FED1 389A 563C C272 A126



More information about the Fortran mailing list