X-Git-Url: http://git.sourceforge.jp/view?p=pf3gnuchains%2Fgcc-fork.git;a=blobdiff_plain;f=gcc%2Ffortran%2Ftrans-stmt.c;h=c7ae36005d21aa8ee22bfc2b4ec7aa1267cd75a3;hp=c71eeec400fc6f378885520e3a7ad23802e35696;hb=40386751ff4443cecb2d9704efac328b6dec66f1;hpb=8451ce2f70e6490314a641483356c5e397074e7a

diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c
index c71eeec400f..c7ae36005d2 100644
--- a/gcc/fortran/trans-stmt.c
+++ b/gcc/fortran/trans-stmt.c
@@ -310,7 +310,7 @@ gfc_conv_elemental_dependencies (gfc_se * se, gfc_se * loopse,
 	  data = gfc_create_var (pvoid_type_node, NULL);
 	  gfc_init_block (&temp_post);
 	  tmp = gfc_trans_create_temp_array (&se->pre, &temp_post,
-					     &tmp_loop, info, temptype,
+					     &tmp_loop, ss, temptype,
 					     initial,
 					     false, true, false,
 					     &arg->expr->where);