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

Mikael Morin <mikael at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2011-08-12
                 CC|                            |mikael at gcc dot gnu.org
     Ever Confirmed|0                           |1

--- Comment #1 from Mikael Morin <mikael at gcc dot gnu.org> 2011-08-12 
11:41:38 UTC ---
Confirmed on recent (patched, but I don't think it matters) trunk on freeBSD:
GNU Fortran (GCC) 4.7.0 20110806 (experimental)

$ valgrind ~/gcc4x/build/gcc/f951 comment_0.f90
==5119== Memcheck, a memory error detector
==5119== Copyright (C) 2002-2010, and GNU GPL'd, by Julian Seward et al.
==5119== Using Valgrind-3.6.0 and LibVEX; rerun with -h for copyright info
==5119== Command: /home/mik/gcc4x/build/gcc/f951 comment_0.f90
==5119== 
 bug main==5119== Invalid read of size 4
==5119==    at 0x1E3AB90: __gmpz_clear (in /usr/local/lib/libgmp.so.10)
==5119==    by 0x4DBA0E: free_expr0(gfc_expr*) (expr.c:479)
==5119==    by 0x4DBB6D: gfc_free_expr(gfc_expr*) (expr.c:497)
==5119==    by 0x543421: gfc_free_statement(gfc_code*) (st.c:84)
==5119==    by 0x54358C: gfc_free_statements(gfc_code*) (st.c:233)
==5119==    by 0x5482B1: gfc_free_namespace(gfc_namespace*) (symbol.c:3246)
==5119==    by 0x548BFF: gfc_symbol_done_2() (symbol.c:3291)
==5119==    by 0x50A008: gfc_done_2() (misc.c:266)
==5119==    by 0x51BD03: gfc_parse_file() (parse.c:4334)
==5119==    by 0x554085: gfc_be_parse_file() (f95-lang.c:250)
==5119==    by 0x8E64D7: toplev_main(int, char**) (toplev.c:548)
==5119==    by 0x4B5F1B: (below main) (in /usr/home/mik/gcc4x/build/gcc/f951)
==5119==  Address 0x247b4d0 is 0 bytes after a block of size 16 alloc'd
==5119==    at 0x25990A: calloc (in
/usr/local/lib/valgrind/vgpreload_memcheck-amd64-freebsd.so)
==5119==    by 0xDF4348: xcalloc (xmalloc.c:162)
==5119==    by 0x4DBD53: gfc_copy_shape(__mpz_struct (*) [1], int) (expr.c:689)
==5119==    by 0x4DBDE5: gfc_copy_expr(gfc_expr*) (expr.c:391)
==5119==    by 0x525908: gfc_expr_to_initialize(gfc_expr*) (resolve.c:6549)
==5119==    by 0x53021A: resolve_allocate_deallocate(gfc_code*, char const*)
(resolve.c:6864)
==5119==    by 0x532796: resolve_code(gfc_code*, gfc_namespace*)
(resolve.c:9302)
==5119==    by 0x53429E: resolve_codes(gfc_namespace*) (resolve.c:13757)
==5119==    by 0x525D07: gfc_resolve(gfc_namespace*) (resolve.c:13784)
==5119==    by 0x51BBAF: gfc_parse_file() (parse.c:4247)
==5119==    by 0x554085: gfc_be_parse_file() (f95-lang.c:250)
==5119==    by 0x8E64D7: toplev_main(int, char**) (toplev.c:548)

Reply via email to