[Bug fortran/41113] spurious _gfortran_internal_pack

[dominiq at lps dot ens dot fr]

------- Comment #13 from dominiq at lps dot ens dot fr  2010-02-08 20:49 -------
I have applied the patch to a clean trunk at revision 156605 and the test
compiles (further tests pending). I have also applied the patch to fortran-dev
at revision 156573 and the compilation gives a segmentation fault:

Program received signal EXC_BAD_ACCESS, Could not access memory.
Reason: KERN_INVALID_ADDRESS at address: 0x0000000000000004
0x00000001000b5332 in gfc_conv_array_parameter (se=0x7fff5fbfe240,
expr=0x1418a9890, ss=<value temporarily unavailable, due to optimizations>,
g77=<value temporarily unavailable, due to optimizations>, fsym=0x0,
proc_name=0x141df53c0 "d_csgetrow", size=0x0) at
../../for_work/gcc/fortran/trans-array.c:5520
5520          if (!sym->attr.pointer && sym->as->type != AS_ASSUMED_SHAPE 
(gdb) bt
#0  0x00000001000b5332 in gfc_conv_array_parameter (se=0x7fff5fbfe240,
expr=0x1418a9890, ss=<value temporarily unavailable, due to optimizations>,
g77=<value temporarily unavailable, due to optimizations>, fsym=0x0,
proc_name=0x141df53c0 "d_csgetrow", size=0x0) at
../../for_work/gcc/fortran/trans-array.c:5520
#1  0x00000001000c7cf2 in gfc_conv_procedure_call (se=0x7fff5fbfe910,
sym=0x14187f7d0, arg=0x1418a52d0, expr=0x1418a93f0, append_args=0x0) at
../../for_work/gcc/fortran/trans-expr.c:2919
#2  0x00000001000e9c7c in gfc_trans_call (code=0x1418aafd0, dependency_check=0
'\0', mask=0x0, count1=0x0, invert=0 '\0') at
../../for_work/gcc/fortran/trans-stmt.c:379
#3  0x00000001000a6c57 in gfc_trans_code (code=0x1418aafd0) at
../../for_work/gcc/fortran/trans.c:1143
#4  0x00000001000c3027 in gfc_generate_function_code (ns=<value temporarily
unavailable, due to optimizations>) at
../../for_work/gcc/fortran/trans-decl.c:4382
#5  0x00000001000a6fdb in gfc_generate_module_code (ns=<value temporarily
unavailable, due to optimizations>) at ../../for_work/gcc/fortran/trans.c:1366
#6  0x0000000100068f7f in gfc_parse_file () at
../../for_work/gcc/fortran/parse.c:4228
#7  0x00000001000a1dbc in gfc_be_parse_file (set_yydebug=<value temporarily
unavailable, due to optimizations>) at
../../for_work/gcc/fortran/f95-lang.c:239
#8  0x00000001006d192a in toplev_main (argc=2, argv=0x7fff5fbfed20) at
../../for_work/gcc/toplev.c:1053
#9  0x0000000100000b84 in start ()

So if the patch is applied to trunk, merging trunk to fortran-dev will give a
regression (cc Jerry) on fortran-dev. I'll attach the tests for a convenient
record.

Note that I am only reporting what I see. I don't have any strong opinion on
how to proceed.


-- 

dominiq at lps dot ens dot fr changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot gnu dot
                   |                            |org


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