projects
/
test_jj.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b6e3390
)
Fortran: ensure intialization of stride array
author
Harald Anlauf
<anlauf@gmx.de>
Tue, 22 Mar 2022 19:54:18 +0000
(20:54 +0100)
committer
Harald Anlauf
<anlauf@gmx.de>
Tue, 22 Mar 2022 19:54:18 +0000
(20:54 +0100)
gcc/fortran/ChangeLog:
PR fortran/104999
* simplify.cc (gfc_simplify_cshift): Ensure temporary holding
source array stride is initialized.
gcc/fortran/simplify.cc
patch
|
blob
|
history
diff --git
a/gcc/fortran/simplify.cc
b/gcc/fortran/simplify.cc
index
0c15bcb
..
233cc42
100644
(file)
--- a/
gcc/fortran/simplify.cc
+++ b/
gcc/fortran/simplify.cc
@@
-2134,6
+2134,7
@@
gfc_simplify_cshift (gfc_expr *array, gfc_expr *shift, gfc_expr *dim)
resultvec = XCNEWVEC (gfc_expr *, arraysize);
+ sstride[0] = 0;
extent[0] = 1;
count[0] = 0;