opt/gdb/gdb.diff
2009-06-11 16:38:03 +02:00

13 lines
454 B
Diff

diff -aur gdb-6.8.orig/gdb/eval.c gdb-6.8/gdb/eval.c
--- gdb-6.8.orig/gdb/eval.c 2008-02-04 01:23:04.000000000 +0100
+++ gdb-6.8/gdb/eval.c 2009-06-11 16:05:46.018550469 +0200
@@ -1647,6 +1647,8 @@
struct type *tmp_type;
int offset_item; /* The array offset where the item lives */
+ memset (subscript_array, 0, sizeof (subscript_array));
+
if (nargs > MAX_FORTRAN_DIMS)
error (_("Too many subscripts for F77 (%d Max)"), MAX_FORTRAN_DIMS);