summaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2014-06-11 06:02:06 +0000
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>2014-06-11 06:02:06 +0000
commitc49dc07089aa5e8cc397b4090ad63f967ba5664d (patch)
tree915e6061d00e1d9c99f4c0b38ba74acd7fe37a49 /gcc
parent318087e2a82f232b479a1bc98d758d768b5c85d4 (diff)
downloadgcc-c49dc07089aa5e8cc397b4090ad63f967ba5664d.tar.gz
2014-06-11 Tobias Burnus <burnus@net-b.de>
* trans-openmp.c (gfc_trans_omp_udr_expr): Fix merge fallout. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/fortran-dev@211435 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/trans-openmp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-openmp.c b/gcc/fortran/trans-openmp.c
index 028ca93cad0..a5ad6749cb1 100644
--- a/gcc/fortran/trans-openmp.c
+++ b/gcc/fortran/trans-openmp.c
@@ -1090,7 +1090,7 @@ gfc_trans_omp_udr_expr (gfc_omp_namelist *n, bool is_initializer,
/* Enable loop reversal. */
for (i = 0; i < GFC_MAX_DIMENSIONS; i++)
loop.reverse[i] = GFC_ENABLE_REVERSE;
- gfc_conv_loop_setup (&loop, &ns->code->loc);
+ gfc_conv_loop_setup (&loop, &ns->code->loc, &syme->ts);
gfc_copy_loopinfo_to_se (&symse, &loop);
gfc_copy_loopinfo_to_se (&outerse, &loop);
symse.ss = symss;