aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/trans-array.c
diff options
context:
space:
mode:
authorDaniel Kraft <d@domob.eu>2011-08-02 22:10:13 +0200
committerDaniel Kraft <domob@gcc.gnu.org>2011-08-02 22:10:13 +0200
commitf315a6b438a961737d5a0def08b4957866b348c7 (patch)
tree3a57d821578e730d8e84cd24848546789954acd2 /gcc/fortran/trans-array.c
parent8f1594b2b805e9214594ad1f4552f629429fd07e (diff)
downloadgcc-f315a6b438a961737d5a0def08b4957866b348c7.zip
gcc-f315a6b438a961737d5a0def08b4957866b348c7.tar.gz
gcc-f315a6b438a961737d5a0def08b4957866b348c7.tar.bz2
re PR fortran/49885 (Segmentation fault when writing to an automatic character array)
2011-08-02 Daniel Kraft <d@domob.eu> PR fortran/49885 * trans-array.c (gfc_trans_auto_array_allocation): Change gfc_start_block to gfc_init_block to avoid spurious extra-scope. 2011-08-02 Daniel Kraft <d@domob.eu> PR fortran/49885 * gfortran.dg/auto_char_dummy_array_3.f90: New test. From-SVN: r177211
Diffstat (limited to 'gcc/fortran/trans-array.c')
-rw-r--r--gcc/fortran/trans-array.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c
index a151c56..85acf0c 100644
--- a/gcc/fortran/trans-array.c
+++ b/gcc/fortran/trans-array.c
@@ -4887,7 +4887,7 @@ gfc_trans_auto_array_allocation (tree decl, gfc_symbol * sym,
gcc_assert (GFC_ARRAY_TYPE_P (type));
onstack = TREE_CODE (type) != POINTER_TYPE;
- gfc_start_block (&init);
+ gfc_init_block (&init);
/* Evaluate character string length. */
if (sym->ts.type == BT_CHARACTER