Rebase to FSF GDB 7.99.90.20170420 (pre-8.0 stable branch).

This commit is contained in:
Jan Kratochvil 2017-04-21 14:47:41 +02:00
parent 5e93e40f3c
commit 5bb0f3bac3
16 changed files with 947 additions and 868 deletions

2
.gitignore vendored
View File

@ -1,3 +1,3 @@
/gdb-libstdc++-v3-python-6.3.1-20170212.tar.xz /gdb-libstdc++-v3-python-6.3.1-20170212.tar.xz
/v1.5.tar.gz /v1.5.tar.gz
/gdb-7.12.50.20170309.tar.xz /gdb-7.99.90.20170420.tar.xz

View File

@ -11,10 +11,10 @@
* gdb.texinfo (File Options): Document --readnever. * gdb.texinfo (File Options): Document --readnever.
Index: gdb-7.12.50.20170226/gdb/doc/gdb.texinfo Index: gdb-7.99.90.20170420/gdb/doc/gdb.texinfo
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/doc/gdb.texinfo 2017-02-26 21:26:43.609788662 +0100 --- gdb-7.99.90.20170420.orig/gdb/doc/gdb.texinfo 2017-04-20 22:29:39.179740076 +0200
+++ gdb-7.12.50.20170226/gdb/doc/gdb.texinfo 2017-02-26 21:26:46.582809721 +0100 +++ gdb-7.99.90.20170420/gdb/doc/gdb.texinfo 2017-04-20 22:29:40.924751096 +0200
@@ -1037,6 +1037,12 @@ @@ -1037,6 +1037,12 @@
the default, which is to read it incrementally as it is needed. the default, which is to read it incrementally as it is needed.
This makes startup slower, but makes future operations faster. This makes startup slower, but makes future operations faster.
@ -28,10 +28,10 @@ Index: gdb-7.12.50.20170226/gdb/doc/gdb.texinfo
@end table @end table
@node Mode Options @node Mode Options
Index: gdb-7.12.50.20170226/gdb/main.c Index: gdb-7.99.90.20170420/gdb/main.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/main.c 2017-02-26 21:26:43.612788684 +0100 --- gdb-7.99.90.20170420.orig/gdb/main.c 2017-04-20 22:29:39.182740095 +0200
+++ gdb-7.12.50.20170226/gdb/main.c 2017-02-26 21:26:46.582809721 +0100 +++ gdb-7.99.90.20170420/gdb/main.c 2017-04-20 22:29:40.925751103 +0200
@@ -615,6 +615,7 @@ @@ -615,6 +615,7 @@
{"tui", no_argument, 0, OPT_TUI}, {"tui", no_argument, 0, OPT_TUI},
{"dbx", no_argument, &dbx_commands, 1}, {"dbx", no_argument, &dbx_commands, 1},
@ -40,7 +40,7 @@ Index: gdb-7.12.50.20170226/gdb/main.c
{"r", no_argument, &readnow_symbol_files, 1}, {"r", no_argument, &readnow_symbol_files, 1},
{"quiet", no_argument, &quiet, 1}, {"quiet", no_argument, &quiet, 1},
{"q", no_argument, &quiet, 1}, {"q", no_argument, &quiet, 1},
@@ -1253,6 +1254,7 @@ @@ -1254,6 +1255,7 @@
--se=FILE Use FILE as symbol file and executable file.\n\ --se=FILE Use FILE as symbol file and executable file.\n\
--symbols=SYMFILE Read symbols from SYMFILE.\n\ --symbols=SYMFILE Read symbols from SYMFILE.\n\
--readnow Fully read symbol files on first access.\n\ --readnow Fully read symbol files on first access.\n\
@ -48,10 +48,10 @@ Index: gdb-7.12.50.20170226/gdb/main.c
--write Set writing into executable and core files.\n\n\ --write Set writing into executable and core files.\n\n\
"), stream); "), stream);
fputs_unfiltered (_("\ fputs_unfiltered (_("\
Index: gdb-7.12.50.20170226/gdb/symfile.c Index: gdb-7.99.90.20170420/gdb/symfile.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/symfile.c 2017-02-26 21:26:43.613788691 +0100 --- gdb-7.99.90.20170420.orig/gdb/symfile.c 2017-04-20 22:29:39.183740101 +0200
+++ gdb-7.12.50.20170226/gdb/symfile.c 2017-02-26 21:26:46.583809728 +0100 +++ gdb-7.99.90.20170420/gdb/symfile.c 2017-04-20 22:29:40.926751109 +0200
@@ -79,6 +79,7 @@ @@ -79,6 +79,7 @@
/* Global variables owned by this file. */ /* Global variables owned by this file. */
@ -60,19 +60,19 @@ Index: gdb-7.12.50.20170226/gdb/symfile.c
/* Functions this file defines. */ /* Functions this file defines. */
Index: gdb-7.12.50.20170226/gdb/dwarf2read.c Index: gdb-7.99.90.20170420/gdb/dwarf2read.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/dwarf2read.c 2017-02-26 21:26:43.620788740 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2read.c 2017-04-20 22:29:39.190740145 +0200
+++ gdb-7.12.50.20170226/gdb/dwarf2read.c 2017-02-26 21:26:59.078898234 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2read.c 2017-04-20 22:29:57.973858766 +0200
@@ -71,6 +71,7 @@ @@ -73,6 +73,7 @@
#include "namespace.h"
#include "common/gdb_unlinker.h"
#include "common/function-view.h" #include "common/function-view.h"
#include "common/gdb_optional.h"
#include "common/underlying.h"
+#include "top.h" +#include "top.h"
#include <fcntl.h> #include <fcntl.h>
#include <sys/types.h> #include <sys/types.h>
@@ -2113,7 +2114,8 @@ @@ -2208,7 +2209,8 @@
(void *) names); (void *) names);
dwarf2_per_objfile->objfile = objfile; dwarf2_per_objfile->objfile = objfile;
} }
@ -82,10 +82,10 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2read.c
&& dwarf2_per_objfile->info.s.section != NULL && dwarf2_per_objfile->info.s.section != NULL
&& !dwarf2_per_objfile->abbrev.is_virtual && !dwarf2_per_objfile->abbrev.is_virtual
&& dwarf2_per_objfile->abbrev.s.section != NULL); && dwarf2_per_objfile->abbrev.s.section != NULL);
Index: gdb-7.12.50.20170226/gdb/top.h Index: gdb-7.99.90.20170420/gdb/top.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/top.h 2017-02-26 21:26:43.622788754 +0100 --- gdb-7.99.90.20170420.orig/gdb/top.h 2017-04-20 22:29:39.191740152 +0200
+++ gdb-7.12.50.20170226/gdb/top.h 2017-02-26 21:26:46.589809771 +0100 +++ gdb-7.99.90.20170420/gdb/top.h 2017-04-20 22:29:40.932751147 +0200
@@ -269,6 +269,7 @@ @@ -269,6 +269,7 @@
/* From random places. */ /* From random places. */

View File

@ -1,7 +1,7 @@
Index: gdb-7.12.50.20170207/gdb/corelow.c Index: gdb-7.99.90.20170420/gdb/corelow.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/corelow.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/corelow.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/corelow.c 2017-02-24 22:32:38.793264396 +0100 +++ gdb-7.99.90.20170420/gdb/corelow.c 2017-04-20 23:00:43.358629183 +0200
@@ -45,6 +45,10 @@ @@ -45,6 +45,10 @@
#include "gdb_bfd.h" #include "gdb_bfd.h"
#include "completer.h" #include "completer.h"
@ -83,7 +83,7 @@ Index: gdb-7.12.50.20170207/gdb/corelow.c
post_create_inferior (&core_ops, from_tty); post_create_inferior (&core_ops, from_tty);
/* Now go through the target stack looking for threads since there /* Now go through the target stack looking for threads since there
@@ -1078,4 +1138,11 @@ @@ -1079,4 +1139,11 @@
init_core_ops (); init_core_ops ();
add_target_with_completer (&core_ops, filename_completer); add_target_with_completer (&core_ops, filename_completer);
@ -95,11 +95,11 @@ Index: gdb-7.12.50.20170207/gdb/corelow.c
+ NULL, NULL, NULL, + NULL, NULL, NULL,
+ &setlist, &showlist); + &setlist, &showlist);
} }
Index: gdb-7.12.50.20170207/gdb/doc/gdb.texinfo Index: gdb-7.99.90.20170420/gdb/doc/gdb.texinfo
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/doc/gdb.texinfo 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/doc/gdb.texinfo 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/doc/gdb.texinfo 2017-02-24 22:32:38.803264463 +0100 +++ gdb-7.99.90.20170420/gdb/doc/gdb.texinfo 2017-04-20 23:00:43.366629228 +0200
@@ -18962,6 +18962,27 @@ @@ -18987,6 +18987,27 @@
@end table @end table
@ -127,10 +127,10 @@ Index: gdb-7.12.50.20170207/gdb/doc/gdb.texinfo
@cindex @code{.gnu_debuglink} sections @cindex @code{.gnu_debuglink} sections
@cindex debug link sections @cindex debug link sections
A debug link is a special section of the executable file named A debug link is a special section of the executable file named
Index: gdb-7.12.50.20170207/gdb/solib-svr4.c Index: gdb-7.99.90.20170420/gdb/solib-svr4.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/solib-svr4.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/solib-svr4.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/solib-svr4.c 2017-02-24 22:32:38.804264469 +0100 +++ gdb-7.99.90.20170420/gdb/solib-svr4.c 2017-04-20 23:00:43.367629234 +0200
@@ -45,6 +45,7 @@ @@ -45,6 +45,7 @@
#include "auxv.h" #include "auxv.h"
#include "gdb_bfd.h" #include "gdb_bfd.h"
@ -195,10 +195,10 @@ Index: gdb-7.12.50.20170207/gdb/solib-svr4.c
xfree (buffer); xfree (buffer);
/* If this entry has no name, or its name matches the name /* If this entry has no name, or its name matches the name
Index: gdb-7.12.50.20170207/gdb/elfread.c Index: gdb-7.99.90.20170420/gdb/elfread.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/elfread.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/elfread.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/elfread.c 2017-02-24 22:32:38.805264476 +0100 +++ gdb-7.99.90.20170420/gdb/elfread.c 2017-04-20 23:00:43.367629234 +0200
@@ -1265,8 +1265,9 @@ @@ -1265,8 +1265,9 @@
&& objfile->separate_debug_objfile == NULL && objfile->separate_debug_objfile == NULL
&& objfile->separate_debug_objfile_backlink == NULL) && objfile->separate_debug_objfile_backlink == NULL)
@ -221,11 +221,11 @@ Index: gdb-7.12.50.20170207/gdb/elfread.c
} }
} }
Index: gdb-7.12.50.20170207/gdb/symfile.h Index: gdb-7.99.90.20170420/gdb/symfile.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/symfile.h 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/symfile.h 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/symfile.h 2017-02-24 22:32:38.805264476 +0100 +++ gdb-7.99.90.20170420/gdb/symfile.h 2017-04-20 23:00:43.368629240 +0200
@@ -573,6 +573,10 @@ @@ -567,6 +567,10 @@
void map_symbol_filenames (symbol_filename_ftype *fun, void *data, void map_symbol_filenames (symbol_filename_ftype *fun, void *data,
int need_fullname); int need_fullname);
@ -236,10 +236,10 @@ Index: gdb-7.12.50.20170207/gdb/symfile.h
/* From dwarf2read.c */ /* From dwarf2read.c */
/* Names for a dwarf2 debugging section. The field NORMAL is the normal /* Names for a dwarf2 debugging section. The field NORMAL is the normal
Index: gdb-7.12.50.20170207/gdb/testsuite/lib/gdb.exp Index: gdb-7.99.90.20170420/gdb/testsuite/lib/gdb.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/testsuite/lib/gdb.exp 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/lib/gdb.exp 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/testsuite/lib/gdb.exp 2017-02-24 22:32:38.806264483 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/lib/gdb.exp 2017-04-20 23:00:43.369629245 +0200
@@ -1646,6 +1646,16 @@ @@ -1646,6 +1646,16 @@
warning "Couldn't set the width to 0." warning "Couldn't set the width to 0."
} }
@ -257,10 +257,10 @@ Index: gdb-7.12.50.20170207/gdb/testsuite/lib/gdb.exp
return 0 return 0
} }
Index: gdb-7.12.50.20170207/gdb/testsuite/lib/mi-support.exp Index: gdb-7.99.90.20170420/gdb/testsuite/lib/mi-support.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/testsuite/lib/mi-support.exp 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/lib/mi-support.exp 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/testsuite/lib/mi-support.exp 2017-02-24 22:32:38.807264489 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/lib/mi-support.exp 2017-04-20 23:00:43.369629245 +0200
@@ -309,6 +309,16 @@ @@ -309,6 +309,16 @@
warning "Couldn't set the width to 0." warning "Couldn't set the width to 0."
} }
@ -278,10 +278,10 @@ Index: gdb-7.12.50.20170207/gdb/testsuite/lib/mi-support.exp
if { $separate_inferior_pty } { if { $separate_inferior_pty } {
mi_create_inferior_pty mi_create_inferior_pty
Index: gdb-7.12.50.20170207/gdb/testsuite/gdb.base/new-ui-pending-input.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.base/new-ui-pending-input.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/testsuite/gdb.base/new-ui-pending-input.exp 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.base/new-ui-pending-input.exp 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/testsuite/gdb.base/new-ui-pending-input.exp 2017-02-24 22:32:38.807264489 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.base/new-ui-pending-input.exp 2017-04-20 23:00:43.369629245 +0200
@@ -62,6 +62,7 @@ @@ -62,6 +62,7 @@
set options "" set options ""
append options " -iex \"set height 0\"" append options " -iex \"set height 0\""
@ -290,10 +290,10 @@ Index: gdb-7.12.50.20170207/gdb/testsuite/gdb.base/new-ui-pending-input.exp
append options " -iex \"new-ui console $extra_tty_name\"" append options " -iex \"new-ui console $extra_tty_name\""
append options " -ex \"b $bpline\"" append options " -ex \"b $bpline\""
append options " -ex \"run\"" append options " -ex \"run\""
Index: gdb-7.12.50.20170207/gdb/objfiles.h Index: gdb-7.99.90.20170420/gdb/objfiles.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/objfiles.h 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/objfiles.h 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/objfiles.h 2017-02-24 22:32:38.808264496 +0100 +++ gdb-7.99.90.20170420/gdb/objfiles.h 2017-04-20 23:00:43.370629251 +0200
@@ -444,6 +444,10 @@ @@ -444,6 +444,10 @@
htab_t static_links; htab_t static_links;
}; };
@ -305,10 +305,10 @@ Index: gdb-7.12.50.20170207/gdb/objfiles.h
/* Declarations for functions defined in objfiles.c */ /* Declarations for functions defined in objfiles.c */
extern struct objfile *allocate_objfile (bfd *, const char *name, extern struct objfile *allocate_objfile (bfd *, const char *name,
Index: gdb-7.12.50.20170207/gdb/testsuite/gdb.base/corefile.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.base/corefile.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/testsuite/gdb.base/corefile.exp 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.base/corefile.exp 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/testsuite/gdb.base/corefile.exp 2017-02-24 22:32:38.808264496 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.base/corefile.exp 2017-04-20 23:00:43.370629251 +0200
@@ -293,3 +293,33 @@ @@ -293,3 +293,33 @@
pass $test pass $test
} }
@ -343,10 +343,10 @@ Index: gdb-7.12.50.20170207/gdb/testsuite/gdb.base/corefile.exp
+ gdb_test "info files" "Local exec file:\r\n\[ \t\]*`[string_to_regexp $debugdir/$buildid]', file type .*" + gdb_test "info files" "Local exec file:\r\n\[ \t\]*`[string_to_regexp $debugdir/$buildid]', file type .*"
+ pass $wholetest + pass $wholetest
+} +}
Index: gdb-7.12.50.20170207/gdb/build-id.c Index: gdb-7.99.90.20170420/gdb/build-id.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/build-id.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/build-id.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/build-id.c 2017-02-24 22:45:25.817403162 +0100 +++ gdb-7.99.90.20170420/gdb/build-id.c 2017-04-20 23:03:00.060399474 +0200
@@ -26,11 +26,67 @@ @@ -26,11 +26,67 @@
#include "objfiles.h" #include "objfiles.h"
#include "filenames.h" #include "filenames.h"
@ -774,7 +774,7 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
if (found == NULL) if (found == NULL)
warning (_("File \"%s\" has no build-id, file skipped"), warning (_("File \"%s\" has no build-id, file skipped"),
@@ -65,23 +463,56 @@ @@ -65,23 +463,54 @@
return retval; return retval;
} }
@ -796,17 +796,15 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
+ target = xstrdup (buf); + target = xstrdup (buf);
+ else + else
+ { + {
+ char *dir = ldirname (symlink); + const std::string dir (ldirname (symlink));
+ +
+ if (dir == NULL)
+ return xstrdup (symlink);
+ target = xstrprintf ("%s" + target = xstrprintf ("%s"
+#ifndef HAVE_DOS_BASED_FILE_SYSTEM +#ifndef HAVE_DOS_BASED_FILE_SYSTEM
+ "/" + "/"
+#else /* HAVE_DOS_BASED_FILE_SYSTEM */ +#else /* HAVE_DOS_BASED_FILE_SYSTEM */
+ "\\" + "\\"
+#endif /* HAVE_DOS_BASED_FILE_SYSTEM */ +#endif /* HAVE_DOS_BASED_FILE_SYSTEM */
+ "%s", dir, buf); + "%s", dir.c_str(), buf);
+ } + }
+ +
+ retval = link_resolve (target, level + 1); + retval = link_resolve (target, level + 1);
@ -838,7 +836,7 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
/* Keep backward compatibility so that DEBUG_FILE_DIRECTORY being "" will /* Keep backward compatibility so that DEBUG_FILE_DIRECTORY being "" will
cause "/.build-id/..." lookups. */ cause "/.build-id/..." lookups. */
@@ -94,9 +525,12 @@ @@ -94,9 +523,12 @@
size_t debugdir_len = strlen (debugdir); size_t debugdir_len = strlen (debugdir);
const gdb_byte *data = build_id; const gdb_byte *data = build_id;
size_t size = build_id_len; size_t size = build_id_len;
@ -852,7 +850,7 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
memcpy (link, debugdir, debugdir_len); memcpy (link, debugdir, debugdir_len);
s = &link[debugdir_len]; s = &link[debugdir_len];
@@ -110,45 +544,290 @@ @@ -110,45 +542,290 @@
*s++ = '/'; *s++ = '/';
while (size-- > 0) while (size-- > 0)
s += sprintf (s, "%02x", (unsigned) *data++); s += sprintf (s, "%02x", (unsigned) *data++);
@ -1161,7 +1159,7 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
/* Prevent looping on a stripped .debug file. */ /* Prevent looping on a stripped .debug file. */
if (abfd != NULL if (abfd != NULL
&& filename_cmp (bfd_get_filename (abfd.get ()), && filename_cmp (bfd_get_filename (abfd.get ()),
@@ -160,3 +839,21 @@ @@ -160,3 +837,21 @@
} }
return NULL; return NULL;
} }
@ -1183,10 +1181,10 @@ Index: gdb-7.12.50.20170207/gdb/build-id.c
+ +
+ observer_attach_executable_changed (debug_print_executable_changed); + observer_attach_executable_changed (debug_print_executable_changed);
+} +}
Index: gdb-7.12.50.20170207/gdb/build-id.h Index: gdb-7.99.90.20170420/gdb/build-id.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/build-id.h 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/build-id.h 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/build-id.h 2017-02-24 22:32:38.809264503 +0100 +++ gdb-7.99.90.20170420/gdb/build-id.h 2017-04-20 23:00:43.371629257 +0200
@@ -22,9 +22,10 @@ @@ -22,9 +22,10 @@
#include "gdb_bfd.h" #include "gdb_bfd.h"
@ -1222,11 +1220,11 @@ Index: gdb-7.12.50.20170207/gdb/build-id.h
+ gdb::unique_xmalloc_ptr<char> *build_id_filename_return); + gdb::unique_xmalloc_ptr<char> *build_id_filename_return);
#endif /* BUILD_ID_H */ #endif /* BUILD_ID_H */
Index: gdb-7.12.50.20170207/gdb/dwarf2read.c Index: gdb-7.99.90.20170420/gdb/dwarf2read.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/dwarf2read.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2read.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/dwarf2read.c 2017-02-24 22:32:38.814264536 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2read.c 2017-04-20 23:00:43.375629279 +0200
@@ -2534,7 +2534,7 @@ @@ -2671,7 +2671,7 @@
} }
if (dwz_bfd == NULL) if (dwz_bfd == NULL)
@ -1235,11 +1233,11 @@ Index: gdb-7.12.50.20170207/gdb/dwarf2read.c
if (dwz_bfd == NULL) if (dwz_bfd == NULL)
error (_("could not find '.gnu_debugaltlink' file for %s"), error (_("could not find '.gnu_debugaltlink' file for %s"),
Index: gdb-7.12.50.20170207/gdb/python/py-objfile.c Index: gdb-7.99.90.20170420/gdb/python/py-objfile.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/python/py-objfile.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/python/py-objfile.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/python/py-objfile.c 2017-02-24 22:32:38.814264536 +0100 +++ gdb-7.99.90.20170420/gdb/python/py-objfile.c 2017-04-20 23:00:43.375629279 +0200
@@ -136,7 +136,7 @@ @@ -137,7 +137,7 @@
TRY TRY
{ {
@ -1248,7 +1246,7 @@ Index: gdb-7.12.50.20170207/gdb/python/py-objfile.c
} }
CATCH (except, RETURN_MASK_ALL) CATCH (except, RETURN_MASK_ALL)
{ {
@@ -546,7 +546,7 @@ @@ -544,7 +544,7 @@
/* Don't return separate debug files. */ /* Don't return separate debug files. */
if (objfile->separate_debug_objfile_backlink != NULL) if (objfile->separate_debug_objfile_backlink != NULL)
continue; continue;
@ -1257,10 +1255,10 @@ Index: gdb-7.12.50.20170207/gdb/python/py-objfile.c
if (obfd_build_id == NULL) if (obfd_build_id == NULL)
continue; continue;
if (objfpy_build_id_matches (obfd_build_id, build_id)) if (objfpy_build_id_matches (obfd_build_id, build_id))
Index: gdb-7.12.50.20170207/gdb/coffread.c Index: gdb-7.99.90.20170420/gdb/coffread.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170207.orig/gdb/coffread.c 2017-02-24 22:18:02.176391400 +0100 --- gdb-7.99.90.20170420.orig/gdb/coffread.c 2017-04-20 23:00:35.415584426 +0200
+++ gdb-7.12.50.20170207/gdb/coffread.c 2017-02-24 22:32:38.815264543 +0100 +++ gdb-7.99.90.20170420/gdb/coffread.c 2017-04-20 23:00:43.376629285 +0200
@@ -734,7 +734,7 @@ @@ -734,7 +734,7 @@
{ {
char *debugfile; char *debugfile;

View File

@ -1,7 +1,7 @@
Index: gdb-7.11.50.20160716/gdb/infrun.c Index: gdb-7.99.90.20170420/gdb/infrun.c
=================================================================== ===================================================================
--- gdb-7.11.50.20160716.orig/gdb/infrun.c 2016-07-16 14:37:09.317178150 +0200 --- gdb-7.99.90.20170420.orig/gdb/infrun.c 2017-04-20 23:19:16.056434309 +0200
+++ gdb-7.11.50.20160716/gdb/infrun.c 2016-07-16 14:37:10.636188765 +0200 +++ gdb-7.99.90.20170420/gdb/infrun.c 2017-04-20 23:19:22.932480367 +0200
@@ -620,6 +620,13 @@ @@ -620,6 +620,13 @@
target_pid_to_str (process_ptid)); target_pid_to_str (process_ptid));
} }
@ -16,10 +16,10 @@ Index: gdb-7.11.50.20160716/gdb/infrun.c
target_detach (NULL, 0); target_detach (NULL, 0);
} }
Index: gdb-7.11.50.20160716/gdb/linux-nat.c Index: gdb-7.99.90.20170420/gdb/linux-nat.c
=================================================================== ===================================================================
--- gdb-7.11.50.20160716.orig/gdb/linux-nat.c 2016-07-16 14:37:09.320178174 +0200 --- gdb-7.99.90.20170420.orig/gdb/linux-nat.c 2017-04-20 23:19:16.058434322 +0200
+++ gdb-7.11.50.20160716/gdb/linux-nat.c 2016-07-16 14:38:09.574663094 +0200 +++ gdb-7.99.90.20170420/gdb/linux-nat.c 2017-04-20 23:19:22.933480373 +0200
@@ -194,6 +194,11 @@ @@ -194,6 +194,11 @@
static struct target_ops *linux_ops; static struct target_ops *linux_ops;
static struct target_ops linux_ops_saved; static struct target_ops linux_ops_saved;
@ -32,7 +32,7 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
/* The method to call, if any, when a new thread is attached. */ /* The method to call, if any, when a new thread is attached. */
static void (*linux_nat_new_thread) (struct lwp_info *); static void (*linux_nat_new_thread) (struct lwp_info *);
@@ -1047,6 +1052,9 @@ @@ -1055,6 +1060,9 @@
if (debug_linux_nat) if (debug_linux_nat)
fprintf_unfiltered (gdb_stdlog, fprintf_unfiltered (gdb_stdlog,
"LNPAW: Attaching to a stopped process\n"); "LNPAW: Attaching to a stopped process\n");
@ -42,7 +42,7 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
/* The process is definitely stopped. It is in a job control /* The process is definitely stopped. It is in a job control
stop, unless the kernel predates the TASK_STOPPED / stop, unless the kernel predates the TASK_STOPPED /
@@ -1404,6 +1412,25 @@ @@ -1412,6 +1420,25 @@
return gdb_signal_to_host (signo); return gdb_signal_to_host (signo);
} }
@ -68,7 +68,7 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
return 0; return 0;
} }
@@ -1562,6 +1589,10 @@ @@ -1570,6 +1597,10 @@
detach_one_lwp (main_lwp, &signo); detach_one_lwp (main_lwp, &signo);
inf_ptrace_detach_success (ops); inf_ptrace_detach_success (ops);
@ -77,9 +77,9 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
+ pid_was_stopped = 0; + pid_was_stopped = 0;
+#endif +#endif
} }
delete_lwp (main_lwp->ptid);
} }
@@ -1823,6 +1854,16 @@
@@ -1830,6 +1861,16 @@
return; return;
} }
@ -96,7 +96,7 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
if (resume_many) if (resume_many)
iterate_over_lwps (ptid, linux_nat_resume_callback, lp); iterate_over_lwps (ptid, linux_nat_resume_callback, lp);
@@ -3819,6 +3860,10 @@ @@ -3826,6 +3867,10 @@
/* Let the arch-specific native code know this process is gone. */ /* Let the arch-specific native code know this process is gone. */
linux_nat_forget_process (pid); linux_nat_forget_process (pid);
@ -107,10 +107,10 @@ Index: gdb-7.11.50.20160716/gdb/linux-nat.c
} }
/* Convert a native/host siginfo object, into/from the siginfo in the /* Convert a native/host siginfo object, into/from the siginfo in the
Index: gdb-7.11.50.20160716/gdb/testsuite/gdb.threads/attach-stopped.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.threads/attach-stopped.exp
=================================================================== ===================================================================
--- gdb-7.11.50.20160716.orig/gdb/testsuite/gdb.threads/attach-stopped.exp 2016-07-16 14:37:09.321178182 +0200 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.threads/attach-stopped.exp 2017-04-20 23:19:16.059434329 +0200
+++ gdb-7.11.50.20160716/gdb/testsuite/gdb.threads/attach-stopped.exp 2016-07-16 14:37:10.640188797 +0200 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.threads/attach-stopped.exp 2017-04-20 23:19:22.933480373 +0200
@@ -56,7 +56,65 @@ @@ -56,7 +56,65 @@
gdb_reinitialize_dir $srcdir/$subdir gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile} gdb_load ${binfile}

View File

@ -1,8 +1,8 @@
Index: gdb-7.11.90.20160829/gdb/breakpoint.c Index: gdb-7.99.90.20170420/gdb/breakpoint.c
=================================================================== ===================================================================
--- gdb-7.11.90.20160829.orig/gdb/breakpoint.c 2016-08-29 09:41:57.054875810 +0200 --- gdb-7.99.90.20170420.orig/gdb/breakpoint.c 2017-04-20 23:04:39.627960523 +0200
+++ gdb-7.11.90.20160829/gdb/breakpoint.c 2016-08-29 09:45:04.166612376 +0200 +++ gdb-7.99.90.20170420/gdb/breakpoint.c 2017-04-20 23:07:29.854919725 +0200
@@ -16176,6 +16176,50 @@ @@ -16086,6 +16086,50 @@
static struct cmd_list_element *enablebreaklist = NULL; static struct cmd_list_element *enablebreaklist = NULL;
void void
@ -45,19 +45,19 @@ Index: gdb-7.11.90.20160829/gdb/breakpoint.c
+ } + }
+ +
+ if (changed) + if (changed)
+ qsort (bp_location, bp_location_count, sizeof (*bp_location), + qsort (bp_locations, bp_locations_count, sizeof (*bp_locations),
+ bp_location_compare); + bp_locations_compare);
+} +}
+ +
+void +void
_initialize_breakpoint (void) _initialize_breakpoint (void)
{ {
struct cmd_list_element *c; struct cmd_list_element *c;
Index: gdb-7.11.90.20160829/gdb/breakpoint.h Index: gdb-7.99.90.20170420/gdb/breakpoint.h
=================================================================== ===================================================================
--- gdb-7.11.90.20160829.orig/gdb/breakpoint.h 2016-08-29 09:41:57.054875810 +0200 --- gdb-7.99.90.20170420.orig/gdb/breakpoint.h 2017-04-20 23:04:39.627960523 +0200
+++ gdb-7.11.90.20160829/gdb/breakpoint.h 2016-08-29 09:42:24.370129320 +0200 +++ gdb-7.99.90.20170420/gdb/breakpoint.h 2017-04-20 23:04:48.331009563 +0200
@@ -1644,4 +1644,7 @@ @@ -1646,4 +1646,7 @@
UIOUT iff debugging multiple threads. */ UIOUT iff debugging multiple threads. */
extern void maybe_print_thread_hit_breakpoint (struct ui_out *uiout); extern void maybe_print_thread_hit_breakpoint (struct ui_out *uiout);
@ -65,11 +65,11 @@ Index: gdb-7.11.90.20160829/gdb/breakpoint.h
+ struct section_offsets *delta); + struct section_offsets *delta);
+ +
#endif /* !defined (BREAKPOINT_H) */ #endif /* !defined (BREAKPOINT_H) */
Index: gdb-7.11.90.20160829/gdb/objfiles.c Index: gdb-7.99.90.20170420/gdb/objfiles.c
=================================================================== ===================================================================
--- gdb-7.11.90.20160829.orig/gdb/objfiles.c 2016-08-29 09:41:57.054875810 +0200 --- gdb-7.99.90.20170420.orig/gdb/objfiles.c 2017-04-20 23:04:39.627960523 +0200
+++ gdb-7.11.90.20160829/gdb/objfiles.c 2016-08-29 09:42:24.370129320 +0200 +++ gdb-7.99.90.20170420/gdb/objfiles.c 2017-04-20 23:04:48.332009569 +0200
@@ -916,6 +916,11 @@ @@ -909,6 +909,11 @@
obj_section_addr (s)); obj_section_addr (s));
} }

View File

@ -2,7 +2,7 @@ http://sourceware.org/gdb/wiki/ProjectArcher
http://sourceware.org/gdb/wiki/ArcherBranchManagement http://sourceware.org/gdb/wiki/ArcherBranchManagement
GIT snapshot: GIT snapshot:
commit e2c0cbf93cf20667be449a75d2ada5d377ddb090 commit 718a1618b2f691a7f407213bb50f100ac59f91c3
tromey/python tromey/python
@ -16,10 +16,10 @@ index 0000000..173b8ea
+This branch originally held the Python code for gdb. It still exists +This branch originally held the Python code for gdb. It still exists
+because a small amount of code here has not yet been merged upstream. +because a small amount of code here has not yet been merged upstream.
diff --git a/gdb/Makefile.in b/gdb/Makefile.in diff --git a/gdb/Makefile.in b/gdb/Makefile.in
index 268c2c6..4045ef7 100644 index 291b1a0..150a8ef 100644
--- a/gdb/Makefile.in --- a/gdb/Makefile.in
+++ b/gdb/Makefile.in +++ b/gdb/Makefile.in
@@ -2345,6 +2345,12 @@ stamp-h: $(srcdir)/config.in config.status @@ -2350,6 +2350,12 @@ stamp-h: $(srcdir)/config.in config.status
CONFIG_LINKS= \ CONFIG_LINKS= \
$(SHELL) config.status $(SHELL) config.status
@ -58,7 +58,7 @@ index 304d4b0..d2007a4 100644
gdb/printer/bound_registers.py gdb/printer/bound_registers.py
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
index 962325b..589e22c 100644 index 300d78e..699f2cb 100644
--- a/gdb/doc/gdb.texinfo --- a/gdb/doc/gdb.texinfo
+++ b/gdb/doc/gdb.texinfo +++ b/gdb/doc/gdb.texinfo
@@ -1230,6 +1230,16 @@ for remote debugging. @@ -1230,6 +1230,16 @@ for remote debugging.
@ -79,7 +79,7 @@ index 962325b..589e22c 100644
@item -tui @item -tui
@cindex @code{--tui} @cindex @code{--tui}
diff --git a/gdb/doc/python.texi b/gdb/doc/python.texi diff --git a/gdb/doc/python.texi b/gdb/doc/python.texi
index c3ea203..a3bdb98 100644 index ce5810e..4ceb108 100644
--- a/gdb/doc/python.texi --- a/gdb/doc/python.texi
+++ b/gdb/doc/python.texi +++ b/gdb/doc/python.texi
@@ -88,8 +88,6 @@ containing @code{end}. For example: @@ -88,8 +88,6 @@ containing @code{end}. For example:
@ -112,7 +112,7 @@ index 05a38b2..9801fdf 100644
set variable $gdb_init_done = 1 set variable $gdb_init_done = 1
diff --git a/gdb/main.c b/gdb/main.c diff --git a/gdb/main.c b/gdb/main.c
index 30e27c2..0460c28 100644 index df4b111..6aca8b0 100644
--- a/gdb/main.c --- a/gdb/main.c
+++ b/gdb/main.c +++ b/gdb/main.c
@@ -33,6 +33,7 @@ @@ -33,6 +33,7 @@
@ -132,7 +132,7 @@ index 30e27c2..0460c28 100644
{ {
int argc = context->argc; int argc = context->argc;
char **argv = context->argv; char **argv = context->argv;
@@ -674,10 +675,14 @@ captured_main_1 (struct captured_main_args *context) @@ -676,10 +677,14 @@ captured_main_1 (struct captured_main_args *context)
{"args", no_argument, &set_args, 1}, {"args", no_argument, &set_args, 1},
{"l", required_argument, 0, 'l'}, {"l", required_argument, 0, 'l'},
{"return-child-result", no_argument, &return_child_result, 1}, {"return-child-result", no_argument, &return_child_result, 1},
@ -148,7 +148,7 @@ index 30e27c2..0460c28 100644
{ {
int option_index; int option_index;
@@ -695,6 +700,9 @@ captured_main_1 (struct captured_main_args *context) @@ -697,6 +702,9 @@ captured_main_1 (struct captured_main_args *context)
case 0: case 0:
/* Long option that just sets a flag. */ /* Long option that just sets a flag. */
break; break;
@ -158,7 +158,7 @@ index 30e27c2..0460c28 100644
case OPT_SE: case OPT_SE:
symarg = optarg; symarg = optarg;
execarg = optarg; execarg = optarg;
@@ -853,7 +861,31 @@ captured_main_1 (struct captured_main_args *context) @@ -855,7 +863,31 @@ captured_main_1 (struct captured_main_args *context)
/* Now that gdb_init has created the initial inferior, we're in /* Now that gdb_init has created the initial inferior, we're in
position to set args for that inferior. */ position to set args for that inferior. */
@ -191,7 +191,7 @@ index 30e27c2..0460c28 100644
{ {
/* The remaining options are the command-line options for the /* The remaining options are the command-line options for the
inferior. The first one is the sym/exec file, and the rest inferior. The first one is the sym/exec file, and the rest
@@ -1123,7 +1155,8 @@ captured_main_1 (struct captured_main_args *context) @@ -1125,7 +1157,8 @@ captured_main_1 (struct captured_main_args *context)
/* Read in the old history after all the command files have been /* Read in the old history after all the command files have been
read. */ read. */
@ -201,7 +201,7 @@ index 30e27c2..0460c28 100644
if (batch_flag) if (batch_flag)
{ {
@@ -1136,16 +1169,29 @@ static void @@ -1138,16 +1171,29 @@ static void
captured_main (void *data) captured_main (void *data)
{ {
struct captured_main_args *context = (struct captured_main_args *) data; struct captured_main_args *context = (struct captured_main_args *) data;
@ -238,7 +238,7 @@ index 30e27c2..0460c28 100644
} }
/* No exit -- exit is through quit_command. */ /* No exit -- exit is through quit_command. */
} }
@@ -1188,6 +1234,12 @@ print_gdb_help (struct ui_file *stream) @@ -1190,6 +1236,12 @@ print_gdb_help (struct ui_file *stream)
fputs_unfiltered (_("\ fputs_unfiltered (_("\
This is the GNU debugger. Usage:\n\n\ This is the GNU debugger. Usage:\n\n\
gdb [options] [executable-file [core-file or process-id]]\n\ gdb [options] [executable-file [core-file or process-id]]\n\
@ -251,7 +251,7 @@ index 30e27c2..0460c28 100644
gdb [options] --args executable-file [inferior-arguments ...]\n\n\ gdb [options] --args executable-file [inferior-arguments ...]\n\n\
"), stream); "), stream);
fputs_unfiltered (_("\ fputs_unfiltered (_("\
@@ -1232,6 +1284,13 @@ Output and user interface control:\n\n\ @@ -1234,6 +1286,13 @@ Output and user interface control:\n\n\
#endif #endif
fputs_unfiltered (_("\ fputs_unfiltered (_("\
--dbx DBX compatibility mode.\n\ --dbx DBX compatibility mode.\n\
@ -449,10 +449,10 @@ index 0000000..8742680
+ +
+InScope () +InScope ()
diff --git a/gdb/python/python-internal.h b/gdb/python/python-internal.h diff --git a/gdb/python/python-internal.h b/gdb/python/python-internal.h
index 4dd413d..2ad4071 100644 index e84c8d2..69305b4 100644
--- a/gdb/python/python-internal.h --- a/gdb/python/python-internal.h
+++ b/gdb/python/python-internal.h +++ b/gdb/python/python-internal.h
@@ -551,6 +551,9 @@ class gdbpy_enter_varobj : public gdbpy_enter @@ -672,6 +672,9 @@ class gdbpy_enter_varobj : public gdbpy_enter
}; };
@ -463,7 +463,7 @@ index 4dd413d..2ad4071 100644
extern const struct language_defn *python_language; extern const struct language_defn *python_language;
diff --git a/gdb/python/python.c b/gdb/python/python.c diff --git a/gdb/python/python.c b/gdb/python/python.c
index 73fb3d0..0789c16 100644 index 7e0c507..a67fbc3 100644
--- a/gdb/python/python.c --- a/gdb/python/python.c
+++ b/gdb/python/python.c +++ b/gdb/python/python.c
@@ -95,6 +95,8 @@ const struct extension_language_defn extension_language_python = @@ -95,6 +95,8 @@ const struct extension_language_defn extension_language_python =
@ -505,7 +505,7 @@ index 73fb3d0..0789c16 100644
/* Set the quit flag. */ /* Set the quit flag. */
static void static void
@@ -1192,6 +1217,92 @@ gdbpy_print_stack (void) @@ -1187,6 +1212,92 @@ gdbpy_print_stack (void)
/* Return the current Progspace. /* Return the current Progspace.
There always is one. */ There always is one. */
@ -598,7 +598,7 @@ index 73fb3d0..0789c16 100644
static PyObject * static PyObject *
gdbpy_get_current_progspace (PyObject *unused1, PyObject *unused2) gdbpy_get_current_progspace (PyObject *unused1, PyObject *unused2)
@@ -1888,6 +1999,8 @@ PyMethodDef python_GdbMethods[] = @@ -1881,6 +1992,8 @@ PyMethodDef python_GdbMethods[] =
Evaluate command, a string, as a gdb CLI command. Optionally returns\n\ Evaluate command, a string, as a gdb CLI command. Optionally returns\n\
a Python String containing the output of the command if to_string is\n\ a Python String containing the output of the command if to_string is\n\
set to True." }, set to True." },
@ -632,10 +632,10 @@ index f5d4a3c..3546f7b 100644
gdb_test "python print ('result = %s' % (gdb.selected_frame ().read_register ('sp') == gdb.parse_and_eval ('\$sp')))" \ gdb_test "python print ('result = %s' % (gdb.selected_frame ().read_register ('sp') == gdb.parse_and_eval ('\$sp')))" \
" = True" \ " = True" \
diff --git a/gdb/testsuite/gdb.python/py-value.exp b/gdb/testsuite/gdb.python/py-value.exp diff --git a/gdb/testsuite/gdb.python/py-value.exp b/gdb/testsuite/gdb.python/py-value.exp
index d9a4d20..c87e4d8 100644 index 1781887..8a2ddd6 100644
--- a/gdb/testsuite/gdb.python/py-value.exp --- a/gdb/testsuite/gdb.python/py-value.exp
+++ b/gdb/testsuite/gdb.python/py-value.exp +++ b/gdb/testsuite/gdb.python/py-value.exp
@@ -407,6 +407,15 @@ proc test_value_after_death {} { @@ -384,6 +384,15 @@ proc test_value_after_death {} {
"print value's type" "print value's type"
} }
@ -651,16 +651,16 @@ index d9a4d20..c87e4d8 100644
# Regression test for invalid subscript operations. The bug was that # Regression test for invalid subscript operations. The bug was that
# the type of the value was not being checked before allowing a # the type of the value was not being checked before allowing a
# subscript operation to proceed. # subscript operation to proceed.
@@ -536,6 +545,7 @@ test_value_in_inferior @@ -512,6 +521,7 @@ if ![runto_main] then {
test_value_in_inferior
test_inferior_function_call test_inferior_function_call
test_lazy_strings
test_value_after_death test_value_after_death
+test_cast_regression +test_cast_regression
# Test either C or C++ values. # Test either C or C++ values.
diff --git a/gdb/varobj.c b/gdb/varobj.c diff --git a/gdb/varobj.c b/gdb/varobj.c
index 173abf3..c3abf66 100644 index 5f21d84..18506f1 100644
--- a/gdb/varobj.c --- a/gdb/varobj.c
+++ b/gdb/varobj.c +++ b/gdb/varobj.c
@@ -226,6 +226,14 @@ is_root_p (const struct varobj *var) @@ -226,6 +226,14 @@ is_root_p (const struct varobj *var)
@ -679,7 +679,7 @@ index 173abf3..c3abf66 100644
/* See python-internal.h. */ /* See python-internal.h. */
gdbpy_enter_varobj::gdbpy_enter_varobj (const struct varobj *var) gdbpy_enter_varobj::gdbpy_enter_varobj (const struct varobj *var)
diff --git a/gdb/varobj.h b/gdb/varobj.h diff --git a/gdb/varobj.h b/gdb/varobj.h
index 989c8cd..fc7f177 100644 index e35c1b8..12339d1 100644
--- a/gdb/varobj.h --- a/gdb/varobj.h
+++ b/gdb/varobj.h +++ b/gdb/varobj.h
@@ -320,6 +320,8 @@ extern int varobj_has_more (const struct varobj *var, int to); @@ -320,6 +320,8 @@ extern int varobj_has_more (const struct varobj *var, int to);

View File

@ -34,11 +34,11 @@ gdb/
* dwarf2read.c (process_die): Change gdb_assert to complaint. * dwarf2read.c (process_die): Change gdb_assert to complaint.
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c Index: gdb-7.99.90.20170420/gdb/dwarf2read.c
index 3eaa0b1..71f5d34 100644 ===================================================================
--- a/gdb/dwarf2read.c --- gdb-7.99.90.20170420.orig/gdb/dwarf2read.c 2017-04-20 23:15:26.578897210 +0200
+++ b/gdb/dwarf2read.c +++ gdb-7.99.90.20170420/gdb/dwarf2read.c 2017-04-20 23:15:57.805106371 +0200
@@ -8029,7 +8029,13 @@ process_die (struct die_info *die, struct dwarf2_cu *cu) @@ -8426,7 +8426,13 @@
struct cleanup *in_process; struct cleanup *in_process;
/* We should only be processing those not already in process. */ /* We should only be processing those not already in process. */
@ -47,12 +47,9 @@ index 3eaa0b1..71f5d34 100644
+ { + {
+ complaint (&symfile_complaints, + complaint (&symfile_complaints,
+ _("DIE at 0x%x attempted to be processed twice"), + _("DIE at 0x%x attempted to be processed twice"),
+ die->offset.sect_off); + to_underlying (die->sect_off));
+ return; + return;
+ } + }
die->in_process = 1; die->in_process = 1;
in_process = make_cleanup (reset_die_in_process,die); in_process = make_cleanup (reset_die_in_process,die);
--6TrnltStXW4iwmi0--

View File

@ -1,7 +1,7 @@
Index: gdb-7.12.50.20170226/gdb/doc/python.texi Index: gdb-7.99.90.20170420/gdb/doc/python.texi
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/doc/python.texi 2017-02-28 16:06:13.508969181 +0100 --- gdb-7.99.90.20170420.orig/gdb/doc/python.texi 2017-04-20 23:16:30.895328018 +0200
+++ gdb-7.12.50.20170226/gdb/doc/python.texi 2017-02-28 16:06:14.958979480 +0100 +++ gdb-7.99.90.20170420/gdb/doc/python.texi 2017-04-20 23:16:35.690360136 +0200
@@ -230,6 +230,14 @@ @@ -230,6 +230,14 @@
return value is @code{None}. If @var{to_string} is @code{True}, the return value is @code{None}. If @var{to_string} is @code{True}, the
@value{GDBN} virtual terminal will be temporarily set to unlimited width @value{GDBN} virtual terminal will be temporarily set to unlimited width
@ -17,10 +17,10 @@ Index: gdb-7.12.50.20170226/gdb/doc/python.texi
@end defun @end defun
@findex gdb.breakpoints @findex gdb.breakpoints
Index: gdb-7.12.50.20170226/gdb/python/python-internal.h Index: gdb-7.99.90.20170420/gdb/python/python-internal.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/python/python-internal.h 2017-02-28 16:06:13.510969195 +0100 --- gdb-7.99.90.20170420.orig/gdb/python/python-internal.h 2017-04-20 23:16:30.896328024 +0200
+++ gdb-7.12.50.20170226/gdb/python/python-internal.h 2017-02-28 16:06:14.958979480 +0100 +++ gdb-7.99.90.20170420/gdb/python/python-internal.h 2017-04-20 23:16:35.690360136 +0200
@@ -142,6 +142,8 @@ @@ -142,6 +142,8 @@
#define PyGILState_Release(ARG) ((void)(ARG)) #define PyGILState_Release(ARG) ((void)(ARG))
#define PyEval_InitThreads() #define PyEval_InitThreads()
@ -30,32 +30,32 @@ Index: gdb-7.12.50.20170226/gdb/python/python-internal.h
#define PyEval_ReleaseLock() #define PyEval_ReleaseLock()
#endif #endif
Index: gdb-7.12.50.20170226/gdb/python/python.c Index: gdb-7.99.90.20170420/gdb/python/python.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/python/python.c 2017-02-28 16:06:13.510969195 +0100 --- gdb-7.99.90.20170420.orig/gdb/python/python.c 2017-04-20 23:16:30.897328031 +0200
+++ gdb-7.12.50.20170226/gdb/python/python.c 2017-02-28 16:06:14.959979487 +0100 +++ gdb-7.99.90.20170420/gdb/python/python.c 2017-04-20 23:18:11.377001070 +0200
@@ -596,12 +596,16 @@ @@ -594,12 +594,16 @@
{ {
const char *arg; const char *arg;
PyObject *from_tty_obj = NULL, *to_string_obj = NULL; PyObject *from_tty_obj = NULL, *to_string_obj = NULL;
- int from_tty, to_string; - int from_tty, to_string;
- static char *keywords[] = {"command", "from_tty", "to_string", NULL }; - static const char *keywords[] = { "command", "from_tty", "to_string", NULL };
+ int from_tty, to_string, release_gil; + int from_tty, to_string, release_gil;
+ static char *keywords[] = {"command", "from_tty", "to_string", "release_gil", NULL }; + static const char *keywords[] = {"command", "from_tty", "to_string", "release_gil", NULL };
+ PyObject *release_gil_obj = NULL; + PyObject *release_gil_obj = NULL;
+ /* Initialize it just to avoid a GCC false warning. */ + /* Initialize it just to avoid a GCC false warning. */
+ PyThreadState *state = NULL; + PyThreadState *state = NULL;
- if (! PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!", keywords, &arg, - if (!gdb_PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!", keywords, &arg,
+ if (! PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!O!", keywords, &arg, + if (!gdb_PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!O!", keywords, &arg,
&PyBool_Type, &from_tty_obj, &PyBool_Type, &from_tty_obj,
- &PyBool_Type, &to_string_obj)) - &PyBool_Type, &to_string_obj))
+ &PyBool_Type, &to_string_obj, + &PyBool_Type, &to_string_obj,
+ &PyBool_Type, &release_gil_obj)) + &PyBool_Type, &release_gil_obj))
return NULL; return NULL;
from_tty = 0; from_tty = 0;
@@ -622,6 +626,15 @@ @@ -620,6 +624,15 @@
to_string = cmp; to_string = cmp;
} }
@ -71,7 +71,7 @@ Index: gdb-7.12.50.20170226/gdb/python/python.c
std::string to_string_res; std::string to_string_res;
TRY TRY
@@ -630,6 +643,13 @@ @@ -628,6 +641,13 @@
std::string copy (arg); std::string copy (arg);
struct interp *interp; struct interp *interp;
@ -85,7 +85,7 @@ Index: gdb-7.12.50.20170226/gdb/python/python.c
scoped_restore save_async = make_scoped_restore (&current_ui->async, 0); scoped_restore save_async = make_scoped_restore (&current_ui->async, 0);
scoped_restore save_uiout = make_scoped_restore (&current_uiout); scoped_restore save_uiout = make_scoped_restore (&current_uiout);
@@ -644,10 +664,22 @@ @@ -642,10 +662,22 @@
to_string_res = execute_command_to_string (&copy[0], from_tty); to_string_res = execute_command_to_string (&copy[0], from_tty);
else else
execute_command (&copy[0], from_tty); execute_command (&copy[0], from_tty);
@ -109,10 +109,10 @@ Index: gdb-7.12.50.20170226/gdb/python/python.c
} }
END_CATCH END_CATCH
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.c Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.c
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.c 2017-02-28 16:06:14.959979487 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.c 2017-04-20 23:16:35.691360143 +0200
@@ -0,0 +1,13 @@ @@ -0,0 +1,13 @@
+#include <stdio.h> +#include <stdio.h>
+#include <unistd.h> +#include <unistd.h>
@ -127,10 +127,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.c
+ printf ("Sleeping %d\n", i); + printf ("Sleeping %d\n", i);
+ } + }
+} +}
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.exp 2017-02-28 16:06:14.959979487 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.exp 2017-04-20 23:16:35.691360143 +0200
@@ -0,0 +1,69 @@ @@ -0,0 +1,69 @@
+# Copyright (C) 2014 Free Software Foundation, Inc. +# Copyright (C) 2014 Free Software Foundation, Inc.
+ +
@ -201,10 +201,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.exp
+ } + }
+ } + }
+} +}
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.py Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.py
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.python/py-gil-mthread.py 2017-02-28 16:26:39.565085643 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.python/py-gil-mthread.py 2017-04-20 23:16:35.692360149 +0200
@@ -0,0 +1,28 @@ @@ -0,0 +1,28 @@
+try: +try:
+ import thread + import thread

74
gdb-release-werror.patch Normal file
View File

@ -0,0 +1,74 @@
http://sourceware.org/ml/gdb-patches/2017-04/msg00593.html
Subject: [patch+8.0] release branch: Fix: --enable-werror
--8t9RHnE3ZwKMSgU+
Content-Type: text/plain; charset=iso-2022-jp
Content-Disposition: inline
Hi,
gdb-8.0-branch
./configure --enable-werror --enable-targets=all
aarch64-tdep.c:3045:13: error: $B!F(Bvoid selftests::aarch64_process_record_test()$B!G(B declared $B!F(Bstatic$B!G(B but never defined [-Werror=unused-function]
arm-tdep.c:9601:13: error: $B!F(Bvoid selftests::arm_record_test()$B!G(B declared $B!F(Bstatic$B!G(B but never defined [-Werror=unused-function]
OK for check-in?
Please do not tell me release branches do not support --enable-werror as this
is due to a sourcebase bug, not due to some unexpected compiler
incompatibility.
Sergio: Shouldn't it be also buildbot-tested?
Jan
--8t9RHnE3ZwKMSgU+
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline; filename=1
gdb/ChangeLog
2017-04-21 Jan Kratochvil <jan.kratochvil@redhat.com>
* aarch64-tdep.c (selftests::aarch64_process_record_test): Make it #if
GDB_SELF_TEST.
* arm-tdep.c (selftests::arm_record_test): Likewise.
diff --git a/gdb/aarch64-tdep.c b/gdb/aarch64-tdep.c
index 28c2573..6113621 100644
--- a/gdb/aarch64-tdep.c
+++ b/gdb/aarch64-tdep.c
@@ -3040,10 +3040,12 @@ aarch64_dump_tdep (struct gdbarch *gdbarch, struct ui_file *file)
paddress (gdbarch, tdep->lowest_pc));
}
+#if GDB_SELF_TEST
namespace selftests
{
static void aarch64_process_record_test (void);
}
+#endif
/* Suppress warning from -Wmissing-prototypes. */
extern initialize_file_ftype _initialize_aarch64_tdep;
diff --git a/gdb/arm-tdep.c b/gdb/arm-tdep.c
index c8fabfb..9ac667f 100644
--- a/gdb/arm-tdep.c
+++ b/gdb/arm-tdep.c
@@ -9596,10 +9596,12 @@ arm_dump_tdep (struct gdbarch *gdbarch, struct ui_file *file)
(unsigned long) tdep->lowest_pc);
}
+#if GDB_SELF_TEST
namespace selftests
{
static void arm_record_test (void);
}
+#endif
extern initialize_file_ftype _initialize_arm_tdep; /* -Wmissing-prototypes */
--8t9RHnE3ZwKMSgU+--

File diff suppressed because it is too large Load Diff

View File

@ -137,10 +137,10 @@ Content-Type: text/x-patch
Content-Transfer-Encoding: 7bit Content-Transfer-Encoding: 7bit
Content-Disposition: attachment; filename=bitpos-tdep.patch Content-Disposition: attachment; filename=bitpos-tdep.patch
Index: gdb-7.12.50.20170309/gdb/alpha-tdep.c Index: gdb-7.99.90.20170420/gdb/alpha-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/alpha-tdep.c 2017-03-09 23:35:09.691541049 +0100 --- gdb-7.99.90.20170420.orig/gdb/alpha-tdep.c 2017-04-20 23:12:07.894566371 +0200
+++ gdb-7.12.50.20170309/gdb/alpha-tdep.c 2017-03-09 23:35:14.414573943 +0100 +++ gdb-7.99.90.20170420/gdb/alpha-tdep.c 2017-04-20 23:12:11.228588703 +0200
@@ -300,17 +300,17 @@ @@ -300,17 +300,17 @@
{ {
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
@ -183,10 +183,10 @@ Index: gdb-7.12.50.20170309/gdb/alpha-tdep.c
memcpy (arg_reg_buffer + offset, contents, tlen); memcpy (arg_reg_buffer + offset, contents, tlen);
offset += tlen; offset += tlen;
contents += tlen; contents += tlen;
Index: gdb-7.12.50.20170309/gdb/amd64-tdep.c Index: gdb-7.99.90.20170420/gdb/amd64-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/amd64-tdep.c 2017-03-09 23:35:09.693541062 +0100 --- gdb-7.99.90.20170420.orig/gdb/amd64-tdep.c 2017-04-20 23:12:07.897566391 +0200
+++ gdb-7.12.50.20170309/gdb/amd64-tdep.c 2017-03-09 23:35:14.415573950 +0100 +++ gdb-7.99.90.20170420/gdb/amd64-tdep.c 2017-04-20 23:12:11.229588710 +0200
@@ -735,7 +735,7 @@ @@ -735,7 +735,7 @@
gdb_byte *readbuf, const gdb_byte *writebuf) gdb_byte *readbuf, const gdb_byte *writebuf)
{ {
@ -238,11 +238,11 @@ Index: gdb-7.12.50.20170309/gdb/amd64-tdep.c
regcache_raw_write_part (regcache, regnum, offset, 8, buf); regcache_raw_write_part (regcache, regnum, offset, 8, buf);
} }
} }
Index: gdb-7.12.50.20170309/gdb/amd64-windows-tdep.c Index: gdb-7.99.90.20170420/gdb/amd64-windows-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/amd64-windows-tdep.c 2017-03-09 23:35:09.693541062 +0100 --- gdb-7.99.90.20170420.orig/gdb/amd64-windows-tdep.c 2017-04-20 23:12:07.897566391 +0200
+++ gdb-7.12.50.20170309/gdb/amd64-windows-tdep.c 2017-03-09 23:35:14.416573957 +0100 +++ gdb-7.99.90.20170420/gdb/amd64-windows-tdep.c 2017-04-20 23:12:11.230588717 +0200
@@ -289,7 +289,7 @@ @@ -290,7 +290,7 @@
struct type *type, struct regcache *regcache, struct type *type, struct regcache *regcache,
gdb_byte *readbuf, const gdb_byte *writebuf) gdb_byte *readbuf, const gdb_byte *writebuf)
{ {
@ -251,11 +251,11 @@ Index: gdb-7.12.50.20170309/gdb/amd64-windows-tdep.c
int regnum = -1; int regnum = -1;
/* See if our value is returned through a register. If it is, then /* See if our value is returned through a register. If it is, then
Index: gdb-7.12.50.20170309/gdb/arm-tdep.c Index: gdb-7.99.90.20170420/gdb/arm-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/arm-tdep.c 2017-03-09 23:35:09.698541097 +0100 --- gdb-7.99.90.20170420.orig/gdb/arm-tdep.c 2017-04-20 23:12:07.905566445 +0200
+++ gdb-7.12.50.20170309/gdb/arm-tdep.c 2017-03-09 23:35:14.419573978 +0100 +++ gdb-7.99.90.20170420/gdb/arm-tdep.c 2017-04-20 23:12:11.233588737 +0200
@@ -3487,7 +3487,7 @@ @@ -3492,7 +3492,7 @@
array). Vector types are not currently supported, matching the array). Vector types are not currently supported, matching the
generic AAPCS support. */ generic AAPCS support. */
@ -264,7 +264,7 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
arm_vfp_cprc_sub_candidate (struct type *t, arm_vfp_cprc_sub_candidate (struct type *t,
enum arm_vfp_cprc_base_type *base_type) enum arm_vfp_cprc_base_type *base_type)
{ {
@@ -3570,7 +3570,7 @@ @@ -3575,7 +3575,7 @@
} }
else else
{ {
@ -273,7 +273,7 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
unsigned unitlen; unsigned unitlen;
count = arm_vfp_cprc_sub_candidate (TYPE_TARGET_TYPE (t), count = arm_vfp_cprc_sub_candidate (TYPE_TARGET_TYPE (t),
@@ -3593,12 +3593,12 @@ @@ -3598,12 +3598,12 @@
case TYPE_CODE_STRUCT: case TYPE_CODE_STRUCT:
{ {
@ -288,7 +288,7 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
if (!field_is_static (&TYPE_FIELD (t, i))) if (!field_is_static (&TYPE_FIELD (t, i)))
sub_count = arm_vfp_cprc_sub_candidate (TYPE_FIELD_TYPE (t, i), sub_count = arm_vfp_cprc_sub_candidate (TYPE_FIELD_TYPE (t, i),
@@ -3622,13 +3622,15 @@ @@ -3627,13 +3627,15 @@
case TYPE_CODE_UNION: case TYPE_CODE_UNION:
{ {
@ -307,7 +307,7 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
if (sub_count == -1) if (sub_count == -1)
return -1; return -1;
count = (count > sub_count ? count : sub_count); count = (count > sub_count ? count : sub_count);
@@ -3664,7 +3666,7 @@ @@ -3669,7 +3671,7 @@
int *count) int *count)
{ {
enum arm_vfp_cprc_base_type b = VFP_CPRC_UNKNOWN; enum arm_vfp_cprc_base_type b = VFP_CPRC_UNKNOWN;
@ -316,7 +316,7 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
if (c <= 0 || c > 4) if (c <= 0 || c > 4)
return 0; return 0;
*base_type = b; *base_type = b;
@@ -3745,7 +3747,7 @@ @@ -3750,7 +3752,7 @@
for (argnum = 0; argnum < nargs; argnum++) for (argnum = 0; argnum < nargs; argnum++)
{ {
@ -325,10 +325,10 @@ Index: gdb-7.12.50.20170309/gdb/arm-tdep.c
struct type *arg_type; struct type *arg_type;
struct type *target_type; struct type *target_type;
enum type_code typecode; enum type_code typecode;
Index: gdb-7.12.50.20170309/gdb/avr-tdep.c Index: gdb-7.99.90.20170420/gdb/avr-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/avr-tdep.c 2017-03-09 23:35:09.700541111 +0100 --- gdb-7.99.90.20170420.orig/gdb/avr-tdep.c 2017-04-20 23:12:07.907566458 +0200
+++ gdb-7.12.50.20170309/gdb/avr-tdep.c 2017-03-09 23:35:14.419573978 +0100 +++ gdb-7.99.90.20170420/gdb/avr-tdep.c 2017-04-20 23:12:11.234588743 +0200
@@ -1191,13 +1191,13 @@ @@ -1191,13 +1191,13 @@
struct stack_item struct stack_item
@ -361,11 +361,11 @@ Index: gdb-7.12.50.20170309/gdb/avr-tdep.c
/* Calculate the potential last register needed. /* Calculate the potential last register needed.
E.g. For length 2, registers regnum and regnum-1 (say 25 and 24) E.g. For length 2, registers regnum and regnum-1 (say 25 and 24)
Index: gdb-7.12.50.20170309/gdb/bfin-tdep.c Index: gdb-7.99.90.20170420/gdb/bfin-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/bfin-tdep.c 2017-03-09 23:35:09.700541111 +0100 --- gdb-7.99.90.20170420.orig/gdb/bfin-tdep.c 2017-04-20 23:12:07.907566458 +0200
+++ gdb-7.12.50.20170309/gdb/bfin-tdep.c 2017-03-09 23:35:14.420573985 +0100 +++ gdb-7.99.90.20170420/gdb/bfin-tdep.c 2017-04-20 23:12:11.234588743 +0200
@@ -502,7 +502,7 @@ @@ -504,7 +504,7 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
int i; int i;
long reg_r0, reg_r1, reg_r2; long reg_r0, reg_r1, reg_r2;
@ -374,7 +374,7 @@ Index: gdb-7.12.50.20170309/gdb/bfin-tdep.c
for (i = nargs - 1; i >= 0; i--) for (i = nargs - 1; i >= 0; i--)
{ {
@@ -524,7 +524,7 @@ @@ -526,7 +526,7 @@
{ {
struct type *value_type = value_enclosing_type (args[i]); struct type *value_type = value_enclosing_type (args[i]);
struct type *arg_type = check_typedef (value_type); struct type *arg_type = check_typedef (value_type);
@ -383,10 +383,10 @@ Index: gdb-7.12.50.20170309/gdb/bfin-tdep.c
sp -= container_len; sp -= container_len;
write_memory (sp, value_contents (args[i]), container_len); write_memory (sp, value_contents (args[i]), container_len);
Index: gdb-7.12.50.20170309/gdb/cris-tdep.c Index: gdb-7.99.90.20170420/gdb/cris-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/cris-tdep.c 2017-03-09 23:35:09.702541125 +0100 --- gdb-7.99.90.20170420.orig/gdb/cris-tdep.c 2017-04-20 23:12:07.909566471 +0200
+++ gdb-7.12.50.20170309/gdb/cris-tdep.c 2017-03-09 23:35:14.421573991 +0100 +++ gdb-7.99.90.20170420/gdb/cris-tdep.c 2017-04-20 23:12:11.235588750 +0200
@@ -663,13 +663,13 @@ @@ -663,13 +663,13 @@
struct stack_item struct stack_item
@ -421,10 +421,10 @@ Index: gdb-7.12.50.20170309/gdb/cris-tdep.c
/* How may registers worth of storage do we need for this argument? */ /* How may registers worth of storage do we need for this argument? */
reg_demand = (len / 4) + (len % 4 != 0 ? 1 : 0); reg_demand = (len / 4) + (len % 4 != 0 ? 1 : 0);
Index: gdb-7.12.50.20170309/gdb/h8300-tdep.c Index: gdb-7.99.90.20170420/gdb/h8300-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/h8300-tdep.c 2017-03-09 23:35:09.702541125 +0100 --- gdb-7.99.90.20170420.orig/gdb/h8300-tdep.c 2017-04-20 23:12:07.910566478 +0200
+++ gdb-7.12.50.20170309/gdb/h8300-tdep.c 2017-03-09 23:35:14.421573991 +0100 +++ gdb-7.99.90.20170420/gdb/h8300-tdep.c 2017-04-20 23:12:11.235588750 +0200
@@ -637,7 +637,7 @@ @@ -637,7 +637,7 @@
int struct_return, CORE_ADDR struct_addr) int struct_return, CORE_ADDR struct_addr)
{ {
@ -457,11 +457,11 @@ Index: gdb-7.12.50.20170309/gdb/h8300-tdep.c
for (offset = 0; offset < padded_len; offset += wordsize) for (offset = 0; offset < padded_len; offset += wordsize)
{ {
Index: gdb-7.12.50.20170309/gdb/hppa-tdep.c Index: gdb-7.99.90.20170420/gdb/hppa-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/hppa-tdep.c 2017-03-09 23:35:09.703541132 +0100 --- gdb-7.99.90.20170420.orig/gdb/hppa-tdep.c 2017-04-20 23:12:07.911566485 +0200
+++ gdb-7.12.50.20170309/gdb/hppa-tdep.c 2017-03-09 23:35:14.422573999 +0100 +++ gdb-7.99.90.20170420/gdb/hppa-tdep.c 2017-04-20 23:12:11.236588757 +0200
@@ -988,7 +988,7 @@ @@ -989,7 +989,7 @@
{ {
struct value *arg = args[i]; struct value *arg = args[i];
struct type *type = value_type (arg); struct type *type = value_type (arg);
@ -470,7 +470,7 @@ Index: gdb-7.12.50.20170309/gdb/hppa-tdep.c
const bfd_byte *valbuf; const bfd_byte *valbuf;
bfd_byte fptrbuf[8]; bfd_byte fptrbuf[8];
int regnum; int regnum;
@@ -1183,7 +1183,7 @@ @@ -1184,7 +1184,7 @@
struct type *type, struct regcache *regcache, struct type *type, struct regcache *regcache,
gdb_byte *readbuf, const gdb_byte *writebuf) gdb_byte *readbuf, const gdb_byte *writebuf)
{ {
@ -479,10 +479,10 @@ Index: gdb-7.12.50.20170309/gdb/hppa-tdep.c
int regnum, offset; int regnum, offset;
if (len > 16) if (len > 16)
Index: gdb-7.12.50.20170309/gdb/i386-darwin-tdep.c Index: gdb-7.99.90.20170420/gdb/i386-darwin-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/i386-darwin-tdep.c 2017-03-09 23:35:09.704541139 +0100 --- gdb-7.99.90.20170420.orig/gdb/i386-darwin-tdep.c 2017-04-20 23:12:07.912566492 +0200
+++ gdb-7.12.50.20170309/gdb/i386-darwin-tdep.c 2017-03-09 23:35:14.422573999 +0100 +++ gdb-7.99.90.20170420/gdb/i386-darwin-tdep.c 2017-04-20 23:12:11.237588763 +0200
@@ -167,7 +167,7 @@ @@ -167,7 +167,7 @@
for (write_pass = 0; write_pass < 2; write_pass++) for (write_pass = 0; write_pass < 2; write_pass++)
@ -492,10 +492,10 @@ Index: gdb-7.12.50.20170309/gdb/i386-darwin-tdep.c
int num_m128 = 0; int num_m128 = 0;
if (struct_return) if (struct_return)
Index: gdb-7.12.50.20170309/gdb/i386-tdep.c Index: gdb-7.99.90.20170420/gdb/i386-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/i386-tdep.c 2017-03-09 23:35:09.707541160 +0100 --- gdb-7.99.90.20170420.orig/gdb/i386-tdep.c 2017-04-20 23:12:07.917566525 +0200
+++ gdb-7.12.50.20170309/gdb/i386-tdep.c 2017-03-09 23:35:37.494734688 +0100 +++ gdb-7.99.90.20170420/gdb/i386-tdep.c 2017-04-20 23:12:11.239588777 +0200
@@ -2682,7 +2682,7 @@ @@ -2682,7 +2682,7 @@
gdb_byte buf[4]; gdb_byte buf[4];
int i; int i;
@ -559,10 +559,10 @@ Index: gdb-7.12.50.20170309/gdb/i386-tdep.c
if (i386_fp_regnum_p (get_frame_arch (frame), regnum)) if (i386_fp_regnum_p (get_frame_arch (frame), regnum))
{ {
Index: gdb-7.12.50.20170309/gdb/iq2000-tdep.c Index: gdb-7.99.90.20170420/gdb/iq2000-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/iq2000-tdep.c 2017-03-09 23:35:09.708541167 +0100 --- gdb-7.99.90.20170420.orig/gdb/iq2000-tdep.c 2017-04-20 23:12:07.918566532 +0200
+++ gdb-7.12.50.20170309/gdb/iq2000-tdep.c 2017-03-09 23:35:14.425574019 +0100 +++ gdb-7.99.90.20170420/gdb/iq2000-tdep.c 2017-04-20 23:12:11.239588777 +0200
@@ -651,8 +651,9 @@ @@ -651,8 +651,9 @@
const bfd_byte *val; const bfd_byte *val;
bfd_byte buf[4]; bfd_byte buf[4];
@ -575,23 +575,23 @@ Index: gdb-7.12.50.20170309/gdb/iq2000-tdep.c
/* Used to copy struct arguments into the stack. */ /* Used to copy struct arguments into the stack. */
CORE_ADDR struct_ptr; CORE_ADDR struct_ptr;
Index: gdb-7.12.50.20170309/gdb/m32r-tdep.c Index: gdb-7.99.90.20170420/gdb/m32r-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/m32r-tdep.c 2017-03-09 23:35:09.708541167 +0100 --- gdb-7.99.90.20170420.orig/gdb/m32r-tdep.c 2017-04-20 23:12:11.239588777 +0200
+++ gdb-7.12.50.20170309/gdb/m32r-tdep.c 2017-03-09 23:35:14.425574019 +0100 +++ gdb-7.99.90.20170420/gdb/m32r-tdep.c 2017-04-20 23:12:30.385717023 +0200
@@ -678,7 +678,7 @@ @@ -681,7 +681,7 @@
CORE_ADDR regval; CORE_ADDR regval;
gdb_byte *val; gdb_byte *val;
gdb_byte valbuf[MAX_REGISTER_SIZE]; gdb_byte valbuf[M32R_ARG_REGISTER_SIZE];
- int len; - int len;
+ LONGEST len; + LONGEST len;
/* First force sp to a 4-byte alignment. */ /* First force sp to a 4-byte alignment. */
sp = sp & ~3; sp = sp & ~3;
Index: gdb-7.12.50.20170309/gdb/m68k-tdep.c Index: gdb-7.99.90.20170420/gdb/m68k-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/m68k-tdep.c 2017-03-09 23:35:09.709541174 +0100 --- gdb-7.99.90.20170420.orig/gdb/m68k-tdep.c 2017-04-20 23:12:07.919566538 +0200
+++ gdb-7.12.50.20170309/gdb/m68k-tdep.c 2017-03-09 23:35:14.425574019 +0100 +++ gdb-7.99.90.20170420/gdb/m68k-tdep.c 2017-04-20 23:12:11.240588783 +0200
@@ -377,7 +377,7 @@ @@ -377,7 +377,7 @@
{ {
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
@ -614,11 +614,11 @@ Index: gdb-7.12.50.20170309/gdb/m68k-tdep.c
/* Non-scalars bigger than 4 bytes are left aligned, others are /* Non-scalars bigger than 4 bytes are left aligned, others are
right aligned. */ right aligned. */
Index: gdb-7.12.50.20170309/gdb/m88k-tdep.c Index: gdb-7.99.90.20170420/gdb/m88k-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/m88k-tdep.c 2017-03-09 23:35:09.709541174 +0100 --- gdb-7.99.90.20170420.orig/gdb/m88k-tdep.c 2017-04-20 23:12:07.919566538 +0200
+++ gdb-7.12.50.20170309/gdb/m88k-tdep.c 2017-03-09 23:35:14.426574026 +0100 +++ gdb-7.99.90.20170420/gdb/m88k-tdep.c 2017-04-20 23:12:11.240588783 +0200
@@ -253,13 +253,13 @@ @@ -254,13 +254,13 @@
{ {
struct gdbarch *gdbarch = get_regcache_arch (regcache); struct gdbarch *gdbarch = get_regcache_arch (regcache);
int num_register_words = 0; int num_register_words = 0;
@ -634,7 +634,7 @@ Index: gdb-7.12.50.20170309/gdb/m88k-tdep.c
if (m88k_integral_or_pointer_p (type) && len < 4) if (m88k_integral_or_pointer_p (type) && len < 4)
{ {
@@ -301,8 +301,8 @@ @@ -302,8 +302,8 @@
{ {
const bfd_byte *valbuf = value_contents (args[i]); const bfd_byte *valbuf = value_contents (args[i]);
struct type *type = value_type (args[i]); struct type *type = value_type (args[i]);
@ -645,10 +645,10 @@ Index: gdb-7.12.50.20170309/gdb/m88k-tdep.c
if (m88k_in_register_p (type)) if (m88k_in_register_p (type))
{ {
Index: gdb-7.12.50.20170309/gdb/mep-tdep.c Index: gdb-7.99.90.20170420/gdb/mep-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/mep-tdep.c 2017-03-09 23:35:09.710541181 +0100 --- gdb-7.99.90.20170420.orig/gdb/mep-tdep.c 2017-04-20 23:12:07.920566545 +0200
+++ gdb-7.12.50.20170309/gdb/mep-tdep.c 2017-03-09 23:35:14.426574026 +0100 +++ gdb-7.99.90.20170420/gdb/mep-tdep.c 2017-04-20 23:12:11.241588790 +0200
@@ -2262,7 +2262,7 @@ @@ -2262,7 +2262,7 @@
for (i = 0; i < argc; i++) for (i = 0; i < argc; i++)
@ -658,10 +658,10 @@ Index: gdb-7.12.50.20170309/gdb/mep-tdep.c
if (arg_len > MEP_GPR_SIZE) if (arg_len > MEP_GPR_SIZE)
{ {
Index: gdb-7.12.50.20170309/gdb/mips-tdep.c Index: gdb-7.99.90.20170420/gdb/mips-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/mips-tdep.c 2017-03-09 23:35:09.714541209 +0100 --- gdb-7.99.90.20170420.orig/gdb/mips-tdep.c 2017-04-20 23:12:07.928566599 +0200
+++ gdb-7.12.50.20170309/gdb/mips-tdep.c 2017-03-09 23:35:14.428574040 +0100 +++ gdb-7.99.90.20170420/gdb/mips-tdep.c 2017-04-20 23:12:11.243588804 +0200
@@ -474,7 +474,7 @@ @@ -474,7 +474,7 @@
mips_xfer_register (struct gdbarch *gdbarch, struct regcache *regcache, mips_xfer_register (struct gdbarch *gdbarch, struct regcache *regcache,
int reg_num, int length, int reg_num, int length,
@ -807,11 +807,11 @@ Index: gdb-7.12.50.20170309/gdb/mips-tdep.c
val = value_contents (arg); val = value_contents (arg);
Index: gdb-7.12.50.20170309/gdb/mn10300-tdep.c Index: gdb-7.99.90.20170420/gdb/mn10300-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/mn10300-tdep.c 2017-03-09 23:35:09.715541216 +0100 --- gdb-7.99.90.20170420.orig/gdb/mn10300-tdep.c 2017-04-20 23:12:07.929566605 +0200
+++ gdb-7.12.50.20170309/gdb/mn10300-tdep.c 2017-03-09 23:35:14.429574047 +0100 +++ gdb-7.99.90.20170420/gdb/mn10300-tdep.c 2017-04-20 23:12:11.243588804 +0200
@@ -1219,7 +1219,7 @@ @@ -1220,7 +1220,7 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
const int push_size = register_size (gdbarch, E_PC_REGNUM); const int push_size = register_size (gdbarch, E_PC_REGNUM);
int regs_used; int regs_used;
@ -820,10 +820,10 @@ Index: gdb-7.12.50.20170309/gdb/mn10300-tdep.c
int stack_offset = 0; int stack_offset = 0;
int argnum; int argnum;
const gdb_byte *val; const gdb_byte *val;
Index: gdb-7.12.50.20170309/gdb/mt-tdep.c Index: gdb-7.99.90.20170420/gdb/mt-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/mt-tdep.c 2017-03-09 23:35:09.716541223 +0100 --- gdb-7.99.90.20170420.orig/gdb/mt-tdep.c 2017-04-20 23:12:07.930566612 +0200
+++ gdb-7.12.50.20170309/gdb/mt-tdep.c 2017-03-09 23:35:14.429574047 +0100 +++ gdb-7.99.90.20170420/gdb/mt-tdep.c 2017-04-20 23:12:11.244588810 +0200
@@ -788,9 +788,9 @@ @@ -788,9 +788,9 @@
gdb_byte buf[MT_MAX_STRUCT_SIZE]; gdb_byte buf[MT_MAX_STRUCT_SIZE];
int argreg = MT_1ST_ARGREG; int argreg = MT_1ST_ARGREG;
@ -836,10 +836,10 @@ Index: gdb-7.12.50.20170309/gdb/mt-tdep.c
int i, j; int i, j;
/* First handle however many args we can fit into MT_1ST_ARGREG thru /* First handle however many args we can fit into MT_1ST_ARGREG thru
Index: gdb-7.12.50.20170309/gdb/ppc-sysv-tdep.c Index: gdb-7.99.90.20170420/gdb/ppc-sysv-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/ppc-sysv-tdep.c 2017-03-09 23:35:09.717541230 +0100 --- gdb-7.99.90.20170420.orig/gdb/ppc-sysv-tdep.c 2017-04-20 23:12:07.931566619 +0200
+++ gdb-7.12.50.20170309/gdb/ppc-sysv-tdep.c 2017-03-09 23:35:14.430574054 +0100 +++ gdb-7.99.90.20170420/gdb/ppc-sysv-tdep.c 2017-04-20 23:12:11.245588817 +0200
@@ -67,7 +67,7 @@ @@ -67,7 +67,7 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
int opencl_abi = ppc_sysv_use_opencl_abi (value_type (function)); int opencl_abi = ppc_sysv_use_opencl_abi (value_type (function));
@ -884,10 +884,10 @@ Index: gdb-7.12.50.20170309/gdb/ppc-sysv-tdep.c
/* Enforce alignment of stack location, if requested. */ /* Enforce alignment of stack location, if requested. */
if (align > tdep->wordsize) if (align > tdep->wordsize)
Index: gdb-7.12.50.20170309/gdb/rl78-tdep.c Index: gdb-7.99.90.20170420/gdb/rl78-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/rl78-tdep.c 2017-03-09 23:35:09.717541230 +0100 --- gdb-7.99.90.20170420.orig/gdb/rl78-tdep.c 2017-04-20 23:12:07.931566619 +0200
+++ gdb-7.12.50.20170309/gdb/rl78-tdep.c 2017-03-09 23:35:14.430574054 +0100 +++ gdb-7.99.90.20170420/gdb/rl78-tdep.c 2017-04-20 23:12:11.245588817 +0200
@@ -1352,8 +1352,8 @@ @@ -1352,8 +1352,8 @@
for (i = nargs - 1; i >= 0; i--) for (i = nargs - 1; i >= 0; i--)
{ {
@ -899,10 +899,10 @@ Index: gdb-7.12.50.20170309/gdb/rl78-tdep.c
sp -= container_len; sp -= container_len;
write_memory (rl78_make_data_address (sp), write_memory (rl78_make_data_address (sp),
Index: gdb-7.12.50.20170309/gdb/rs6000-aix-tdep.c Index: gdb-7.99.90.20170420/gdb/rs6000-aix-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/rs6000-aix-tdep.c 2017-03-09 23:35:09.718541237 +0100 --- gdb-7.99.90.20170420.orig/gdb/rs6000-aix-tdep.c 2017-04-20 23:12:07.932566626 +0200
+++ gdb-7.12.50.20170309/gdb/rs6000-aix-tdep.c 2017-03-09 23:35:14.430574054 +0100 +++ gdb-7.99.90.20170420/gdb/rs6000-aix-tdep.c 2017-04-20 23:12:11.245588817 +0200
@@ -186,9 +186,9 @@ @@ -186,9 +186,9 @@
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
@ -924,11 +924,11 @@ Index: gdb-7.12.50.20170309/gdb/rs6000-aix-tdep.c
if (argbytes) if (argbytes)
{ {
Index: gdb-7.12.50.20170309/gdb/s390-linux-tdep.c Index: gdb-7.99.90.20170420/gdb/s390-linux-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/s390-linux-tdep.c 2017-03-09 23:35:09.720541250 +0100 --- gdb-7.99.90.20170420.orig/gdb/s390-linux-tdep.c 2017-04-20 23:12:07.934566639 +0200
+++ gdb-7.12.50.20170309/gdb/s390-linux-tdep.c 2017-03-09 23:35:14.432574068 +0100 +++ gdb-7.99.90.20170420/gdb/s390-linux-tdep.c 2017-04-20 23:12:11.247588830 +0200
@@ -3128,7 +3128,7 @@ @@ -3081,7 +3081,7 @@
/* Determine whether N is a power of two. */ /* Determine whether N is a power of two. */
static int static int
@ -937,7 +937,7 @@ Index: gdb-7.12.50.20170309/gdb/s390-linux-tdep.c
{ {
return n && ((n & (n - 1)) == 0); return n && ((n & (n - 1)) == 0);
} }
@@ -3185,7 +3185,7 @@ @@ -3138,7 +3138,7 @@
enum bfd_endian byte_order, int is_unnamed) enum bfd_endian byte_order, int is_unnamed)
{ {
struct type *type = check_typedef (value_type (arg)); struct type *type = check_typedef (value_type (arg));
@ -946,10 +946,10 @@ Index: gdb-7.12.50.20170309/gdb/s390-linux-tdep.c
int write_mode = as->regcache != NULL; int write_mode = as->regcache != NULL;
if (s390_function_arg_float (type)) if (s390_function_arg_float (type))
Index: gdb-7.12.50.20170309/gdb/score-tdep.c Index: gdb-7.99.90.20170420/gdb/score-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/score-tdep.c 2017-03-09 23:35:09.721541258 +0100 --- gdb-7.99.90.20170420.orig/gdb/score-tdep.c 2017-04-20 23:12:07.935566646 +0200
+++ gdb-7.12.50.20170309/gdb/score-tdep.c 2017-03-09 23:35:14.432574068 +0100 +++ gdb-7.99.90.20170420/gdb/score-tdep.c 2017-04-20 23:12:11.248588837 +0200
@@ -525,7 +525,7 @@ @@ -525,7 +525,7 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
int argnum; int argnum;
@ -959,10 +959,10 @@ Index: gdb-7.12.50.20170309/gdb/score-tdep.c
CORE_ADDR stack_offset = 0; CORE_ADDR stack_offset = 0;
CORE_ADDR addr = 0; CORE_ADDR addr = 0;
Index: gdb-7.12.50.20170309/gdb/sh-tdep.c Index: gdb-7.99.90.20170420/gdb/sh-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/sh-tdep.c 2017-03-09 23:35:09.721541258 +0100 --- gdb-7.99.90.20170420.orig/gdb/sh-tdep.c 2017-04-20 23:12:07.936566652 +0200
+++ gdb-7.12.50.20170309/gdb/sh-tdep.c 2017-03-09 23:35:14.433574075 +0100 +++ gdb-7.99.90.20170420/gdb/sh-tdep.c 2017-04-20 23:12:11.248588837 +0200
@@ -814,7 +814,7 @@ @@ -814,7 +814,7 @@
static int static int
sh_use_struct_convention (int renesas_abi, struct type *type) sh_use_struct_convention (int renesas_abi, struct type *type)
@ -1001,10 +1001,10 @@ Index: gdb-7.12.50.20170309/gdb/sh-tdep.c
int pass_on_stack = 0; int pass_on_stack = 0;
int last_reg_arg = INT_MAX; int last_reg_arg = INT_MAX;
Index: gdb-7.12.50.20170309/gdb/sh64-tdep.c Index: gdb-7.99.90.20170420/gdb/sh64-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/sh64-tdep.c 2017-03-09 23:35:09.722541264 +0100 --- gdb-7.99.90.20170420.orig/gdb/sh64-tdep.c 2017-04-20 23:12:07.937566659 +0200
+++ gdb-7.12.50.20170309/gdb/sh64-tdep.c 2017-03-09 23:35:14.434574082 +0100 +++ gdb-7.99.90.20170420/gdb/sh64-tdep.c 2017-04-20 23:12:11.249588844 +0200
@@ -1062,7 +1062,7 @@ @@ -1062,7 +1062,7 @@
CORE_ADDR struct_addr) CORE_ADDR struct_addr)
{ {
@ -1023,11 +1023,11 @@ Index: gdb-7.12.50.20170309/gdb/sh64-tdep.c
int argreg_size; int argreg_size;
int fp_args[12]; int fp_args[12];
Index: gdb-7.12.50.20170309/gdb/sparc-tdep.c Index: gdb-7.99.90.20170420/gdb/sparc-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/sparc-tdep.c 2017-03-09 23:35:09.723541271 +0100 --- gdb-7.99.90.20170420.orig/gdb/sparc-tdep.c 2017-04-20 23:12:07.938566666 +0200
+++ gdb-7.12.50.20170309/gdb/sparc-tdep.c 2017-03-09 23:35:14.434574082 +0100 +++ gdb-7.99.90.20170420/gdb/sparc-tdep.c 2017-04-20 23:12:11.249588844 +0200
@@ -566,7 +566,7 @@ @@ -567,7 +567,7 @@
for (i = 0; i < nargs; i++) for (i = 0; i < nargs; i++)
{ {
struct type *type = value_type (args[i]); struct type *type = value_type (args[i]);
@ -1036,11 +1036,11 @@ Index: gdb-7.12.50.20170309/gdb/sparc-tdep.c
if (sparc_structure_or_union_p (type) if (sparc_structure_or_union_p (type)
|| (sparc_floating_p (type) && len == 16) || (sparc_floating_p (type) && len == 16)
Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c Index: gdb-7.99.90.20170420/gdb/sparc64-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/sparc64-tdep.c 2017-03-09 23:35:09.724541278 +0100 --- gdb-7.99.90.20170420.orig/gdb/sparc64-tdep.c 2017-04-20 23:12:07.939566672 +0200
+++ gdb-7.12.50.20170309/gdb/sparc64-tdep.c 2017-03-09 23:35:14.435574089 +0100 +++ gdb-7.99.90.20170420/gdb/sparc64-tdep.c 2017-04-20 23:12:11.250588851 +0200
@@ -670,7 +670,8 @@ @@ -696,7 +696,8 @@
static void static void
sparc64_store_floating_fields (struct regcache *regcache, struct type *type, sparc64_store_floating_fields (struct regcache *regcache, struct type *type,
@ -1050,7 +1050,7 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
{ {
struct gdbarch *gdbarch = get_regcache_arch (regcache); struct gdbarch *gdbarch = get_regcache_arch (regcache);
int len = TYPE_LENGTH (type); int len = TYPE_LENGTH (type);
@@ -714,7 +715,7 @@ @@ -740,7 +741,7 @@
for (i = 0; i < TYPE_NFIELDS (type); i++) for (i = 0; i < TYPE_NFIELDS (type); i++)
{ {
struct type *subtype = check_typedef (TYPE_FIELD_TYPE (type, i)); struct type *subtype = check_typedef (TYPE_FIELD_TYPE (type, i));
@ -1059,7 +1059,7 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
sparc64_store_floating_fields (regcache, subtype, valbuf, sparc64_store_floating_fields (regcache, subtype, valbuf,
element, subpos); element, subpos);
@@ -746,7 +747,7 @@ @@ -772,7 +773,7 @@
static void static void
sparc64_extract_floating_fields (struct regcache *regcache, struct type *type, sparc64_extract_floating_fields (struct regcache *regcache, struct type *type,
@ -1068,7 +1068,7 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
{ {
struct gdbarch *gdbarch = get_regcache_arch (regcache); struct gdbarch *gdbarch = get_regcache_arch (regcache);
@@ -786,7 +787,7 @@ @@ -812,7 +813,7 @@
for (i = 0; i < TYPE_NFIELDS (type); i++) for (i = 0; i < TYPE_NFIELDS (type); i++)
{ {
struct type *subtype = check_typedef (TYPE_FIELD_TYPE (type, i)); struct type *subtype = check_typedef (TYPE_FIELD_TYPE (type, i));
@ -1077,7 +1077,7 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
sparc64_extract_floating_fields (regcache, subtype, valbuf, subpos); sparc64_extract_floating_fields (regcache, subtype, valbuf, subpos);
} }
@@ -819,7 +820,7 @@ @@ -845,7 +846,7 @@
for (i = 0; i < nargs; i++) for (i = 0; i < nargs; i++)
{ {
struct type *type = value_type (args[i]); struct type *type = value_type (args[i]);
@ -1086,7 +1086,7 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
if (sparc64_structure_or_union_p (type) if (sparc64_structure_or_union_p (type)
|| (sparc64_complex_floating_p (type) && len == 32)) || (sparc64_complex_floating_p (type) && len == 32))
@@ -919,7 +920,7 @@ @@ -945,7 +946,7 @@
{ {
const gdb_byte *valbuf = value_contents (args[i]); const gdb_byte *valbuf = value_contents (args[i]);
struct type *type = value_type (args[i]); struct type *type = value_type (args[i]);
@ -1095,11 +1095,11 @@ Index: gdb-7.12.50.20170309/gdb/sparc64-tdep.c
int regnum = -1; int regnum = -1;
gdb_byte buf[16]; gdb_byte buf[16];
Index: gdb-7.12.50.20170309/gdb/spu-tdep.c Index: gdb-7.99.90.20170420/gdb/spu-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/spu-tdep.c 2017-03-09 23:35:09.725541285 +0100 --- gdb-7.99.90.20170420.orig/gdb/spu-tdep.c 2017-04-20 23:12:07.940566679 +0200
+++ gdb-7.12.50.20170309/gdb/spu-tdep.c 2017-03-09 23:35:14.435574089 +0100 +++ gdb-7.99.90.20170420/gdb/spu-tdep.c 2017-04-20 23:12:11.251588857 +0200
@@ -1430,7 +1430,7 @@ @@ -1431,7 +1431,7 @@
struct value *arg = args[i]; struct value *arg = args[i];
struct type *type = check_typedef (value_type (arg)); struct type *type = check_typedef (value_type (arg));
const gdb_byte *contents = value_contents (arg); const gdb_byte *contents = value_contents (arg);
@ -1108,7 +1108,7 @@ Index: gdb-7.12.50.20170309/gdb/spu-tdep.c
/* If the argument doesn't wholly fit into registers, it and /* If the argument doesn't wholly fit into registers, it and
all subsequent arguments go to the stack. */ all subsequent arguments go to the stack. */
@@ -1462,7 +1462,7 @@ @@ -1463,7 +1463,7 @@
{ {
struct value *arg = args[i]; struct value *arg = args[i];
struct type *type = check_typedef (value_type (arg)); struct type *type = check_typedef (value_type (arg));
@ -1117,10 +1117,10 @@ Index: gdb-7.12.50.20170309/gdb/spu-tdep.c
int preferred_slot; int preferred_slot;
if (spu_scalar_value_p (type)) if (spu_scalar_value_p (type))
Index: gdb-7.12.50.20170309/gdb/tic6x-tdep.c Index: gdb-7.99.90.20170420/gdb/tic6x-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/tic6x-tdep.c 2017-03-09 23:35:09.725541285 +0100 --- gdb-7.99.90.20170420.orig/gdb/tic6x-tdep.c 2017-04-20 23:12:07.940566679 +0200
+++ gdb-7.12.50.20170309/gdb/tic6x-tdep.c 2017-03-09 23:35:14.436574096 +0100 +++ gdb-7.99.90.20170420/gdb/tic6x-tdep.c 2017-04-20 23:12:11.251588857 +0200
@@ -899,7 +899,7 @@ @@ -899,7 +899,7 @@
int argreg = 0; int argreg = 0;
int argnum; int argnum;
@ -1158,10 +1158,10 @@ Index: gdb-7.12.50.20170309/gdb/tic6x-tdep.c
addr = sp + stack_offset; addr = sp + stack_offset;
write_memory (addr, val, len); write_memory (addr, val, len);
Index: gdb-7.12.50.20170309/gdb/tilegx-tdep.c Index: gdb-7.99.90.20170420/gdb/tilegx-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/tilegx-tdep.c 2017-03-09 23:35:09.726541292 +0100 --- gdb-7.99.90.20170420.orig/gdb/tilegx-tdep.c 2017-04-20 23:12:07.941566686 +0200
+++ gdb-7.12.50.20170309/gdb/tilegx-tdep.c 2017-03-09 23:35:14.436574096 +0100 +++ gdb-7.99.90.20170420/gdb/tilegx-tdep.c 2017-04-20 23:12:11.251588857 +0200
@@ -289,7 +289,7 @@ @@ -289,7 +289,7 @@
CORE_ADDR stack_dest = sp; CORE_ADDR stack_dest = sp;
int argreg = TILEGX_R0_REGNUM; int argreg = TILEGX_R0_REGNUM;
@ -1171,10 +1171,10 @@ Index: gdb-7.12.50.20170309/gdb/tilegx-tdep.c
static const gdb_byte four_zero_words[16] = { 0 }; static const gdb_byte four_zero_words[16] = { 0 };
/* If struct_return is 1, then the struct return address will /* If struct_return is 1, then the struct return address will
Index: gdb-7.12.50.20170309/gdb/v850-tdep.c Index: gdb-7.99.90.20170420/gdb/v850-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/v850-tdep.c 2017-03-09 23:35:09.726541292 +0100 --- gdb-7.99.90.20170420.orig/gdb/v850-tdep.c 2017-04-20 23:12:07.941566686 +0200
+++ gdb-7.12.50.20170309/gdb/v850-tdep.c 2017-03-09 23:35:14.436574096 +0100 +++ gdb-7.99.90.20170420/gdb/v850-tdep.c 2017-04-20 23:12:11.252588864 +0200
@@ -1019,7 +1019,7 @@ @@ -1019,7 +1019,7 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
int argreg; int argreg;
@ -1193,10 +1193,10 @@ Index: gdb-7.12.50.20170309/gdb/v850-tdep.c
gdb_byte *val; gdb_byte *val;
gdb_byte valbuf[v850_reg_size]; gdb_byte valbuf[v850_reg_size];
Index: gdb-7.12.50.20170309/gdb/vax-tdep.c Index: gdb-7.99.90.20170420/gdb/vax-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/vax-tdep.c 2017-03-09 23:35:09.727541299 +0100 --- gdb-7.99.90.20170420.orig/gdb/vax-tdep.c 2017-04-20 23:12:07.942566692 +0200
+++ gdb-7.12.50.20170309/gdb/vax-tdep.c 2017-03-09 23:35:14.437574103 +0100 +++ gdb-7.99.90.20170420/gdb/vax-tdep.c 2017-04-20 23:12:11.252588864 +0200
@@ -111,7 +111,7 @@ @@ -111,7 +111,7 @@
struct gdbarch *gdbarch = get_regcache_arch (regcache); struct gdbarch *gdbarch = get_regcache_arch (regcache);
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
@ -1215,10 +1215,10 @@ Index: gdb-7.12.50.20170309/gdb/vax-tdep.c
sp -= (len + 3) & ~3; sp -= (len + 3) & ~3;
count += (len + 3) / 4; count += (len + 3) / 4;
Index: gdb-7.12.50.20170309/gdb/xstormy16-tdep.c Index: gdb-7.99.90.20170420/gdb/xstormy16-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/xstormy16-tdep.c 2017-03-09 23:35:09.727541299 +0100 --- gdb-7.99.90.20170420.orig/gdb/xstormy16-tdep.c 2017-04-20 23:12:07.942566692 +0200
+++ gdb-7.12.50.20170309/gdb/xstormy16-tdep.c 2017-03-09 23:35:14.437574103 +0100 +++ gdb-7.99.90.20170420/gdb/xstormy16-tdep.c 2017-04-20 23:12:11.252588864 +0200
@@ -233,8 +233,9 @@ @@ -233,8 +233,9 @@
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
CORE_ADDR stack_dest = sp; CORE_ADDR stack_dest = sp;
@ -1231,11 +1231,11 @@ Index: gdb-7.12.50.20170309/gdb/xstormy16-tdep.c
const gdb_byte *val; const gdb_byte *val;
gdb_byte buf[xstormy16_pc_size]; gdb_byte buf[xstormy16_pc_size];
Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c Index: gdb-7.99.90.20170420/gdb/xtensa-tdep.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/xtensa-tdep.c 2017-03-09 23:35:09.728541306 +0100 --- gdb-7.99.90.20170420.orig/gdb/xtensa-tdep.c 2017-04-20 23:12:07.944566706 +0200
+++ gdb-7.12.50.20170309/gdb/xtensa-tdep.c 2017-03-09 23:35:14.438574110 +0100 +++ gdb-7.99.90.20170420/gdb/xtensa-tdep.c 2017-04-20 23:12:11.253588870 +0200
@@ -1639,8 +1639,7 @@ @@ -1637,8 +1637,7 @@
if (len > (callsize > 8 ? 8 : 16)) if (len > (callsize > 8 ? 8 : 16))
internal_error (__FILE__, __LINE__, internal_error (__FILE__, __LINE__,
@ -1245,7 +1245,7 @@ Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c
areg = arreg_number (gdbarch, areg = arreg_number (gdbarch,
gdbarch_tdep (gdbarch)->a0_base + 2 + callsize, wb); gdbarch_tdep (gdbarch)->a0_base + 2 + callsize, wb);
@@ -1714,18 +1713,18 @@ @@ -1712,18 +1711,18 @@
{ {
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
int i; int i;
@ -1267,7 +1267,7 @@ Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c
int regno; /* regno if in register. */ int regno; /* regno if in register. */
} u; } u;
}; };
@@ -1749,9 +1748,10 @@ @@ -1747,9 +1746,10 @@
{ {
struct value *arg = args[i]; struct value *arg = args[i];
struct type *arg_type = check_typedef (value_type (arg)); struct type *arg_type = check_typedef (value_type (arg));
@ -1281,7 +1281,7 @@ Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c
switch (TYPE_CODE (arg_type)) switch (TYPE_CODE (arg_type))
{ {
case TYPE_CODE_INT: case TYPE_CODE_INT:
@@ -1821,8 +1821,8 @@ @@ -1819,8 +1819,8 @@
info->align = TYPE_LENGTH (builtin_type (gdbarch)->builtin_long); info->align = TYPE_LENGTH (builtin_type (gdbarch)->builtin_long);
break; break;
} }
@ -1291,7 +1291,7 @@ Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c
/* Align size and onstack_size. */ /* Align size and onstack_size. */
size = (size + info->align - 1) & ~(info->align - 1); size = (size + info->align - 1) & ~(info->align - 1);
@@ -1867,7 +1867,7 @@ @@ -1865,7 +1865,7 @@
if (info->onstack) if (info->onstack)
{ {
@ -1300,7 +1300,7 @@ Index: gdb-7.12.50.20170309/gdb/xtensa-tdep.c
CORE_ADDR offset = sp + info->u.offset; CORE_ADDR offset = sp + info->u.offset;
/* Odd-sized structs are aligned to the lower side of a memory /* Odd-sized structs are aligned to the lower side of a memory
@@ -1883,7 +1883,7 @@ @@ -1881,7 +1881,7 @@
} }
else else
{ {

View File

@ -26,11 +26,11 @@ dbfd7140bf4c0500d1f5d192be781f83f78f7922
gdb/value.h | 2 + gdb/value.h | 2 +
23 files changed, 1242 insertions(+), 183 deletions(-) 23 files changed, 1242 insertions(+), 183 deletions(-)
Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c Index: gdb-7.99.90.20170420/gdb/dwarf2loc.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/dwarf2loc.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2loc.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/dwarf2loc.c 2017-03-01 22:38:05.803017176 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2loc.c 2017-04-20 22:26:14.356446562 +0200
@@ -2607,11 +2607,14 @@ @@ -2622,11 +2622,14 @@
/* See dwarf2loc.h. */ /* See dwarf2loc.h. */
int int
@ -47,7 +47,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c
if (prop == NULL) if (prop == NULL)
return 0; return 0;
@@ -2635,7 +2638,7 @@ @@ -2650,7 +2653,7 @@
*value = value_as_address (val); *value = value_as_address (val);
} }
@ -56,7 +56,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c
} }
} }
break; break;
@@ -2657,7 +2660,7 @@ @@ -2672,7 +2675,7 @@
if (!value_optimized_out (val)) if (!value_optimized_out (val))
{ {
*value = value_as_address (val); *value = value_as_address (val);
@ -65,7 +65,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c
} }
} }
} }
@@ -2665,8 +2668,8 @@ @@ -2680,8 +2683,8 @@
case PROP_CONST: case PROP_CONST:
*value = prop->data.const_val; *value = prop->data.const_val;
@ -76,7 +76,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c
case PROP_ADDR_OFFSET: case PROP_ADDR_OFFSET:
{ {
struct dwarf2_property_baton *baton struct dwarf2_property_baton *baton
@@ -2687,11 +2690,38 @@ @@ -2702,11 +2705,38 @@
val = value_at (baton->offset_info.type, val = value_at (baton->offset_info.type,
pinfo->addr + baton->offset_info.offset); pinfo->addr + baton->offset_info.offset);
*value = value_as_address (val); *value = value_as_address (val);
@ -117,11 +117,11 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.c
} }
/* See dwarf2loc.h. */ /* See dwarf2loc.h. */
Index: gdb-7.12.50.20170226/gdb/dwarf2loc.h Index: gdb-7.99.90.20170420/gdb/dwarf2loc.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/dwarf2loc.h 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2loc.h 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/dwarf2loc.h 2017-03-01 22:38:05.803017176 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2loc.h 2017-04-20 22:26:14.356446562 +0200
@@ -140,6 +140,12 @@ @@ -143,6 +143,12 @@
struct property_addr_info *addr_stack, struct property_addr_info *addr_stack,
CORE_ADDR *value); CORE_ADDR *value);
@ -134,11 +134,11 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2loc.h
/* A helper for the compiler interface that compiles a single dynamic /* A helper for the compiler interface that compiles a single dynamic
property to C code. property to C code.
Index: gdb-7.12.50.20170226/gdb/dwarf2read.c Index: gdb-7.99.90.20170420/gdb/dwarf2read.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/dwarf2read.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2read.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/dwarf2read.c 2017-03-01 22:38:05.807017204 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2read.c 2017-04-20 22:27:08.510788562 +0200
@@ -15178,7 +15178,7 @@ @@ -15268,7 +15268,7 @@
struct type *base_type, *orig_base_type; struct type *base_type, *orig_base_type;
struct type *range_type; struct type *range_type;
struct attribute *attr; struct attribute *attr;
@ -147,7 +147,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2read.c
int low_default_is_valid; int low_default_is_valid;
int high_bound_is_count = 0; int high_bound_is_count = 0;
const char *name; const char *name;
@@ -15198,7 +15198,9 @@ @@ -15288,7 +15288,9 @@
low.kind = PROP_CONST; low.kind = PROP_CONST;
high.kind = PROP_CONST; high.kind = PROP_CONST;
@ -157,7 +157,7 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2read.c
/* Set LOW_DEFAULT_IS_VALID if current language and DWARF version allow /* Set LOW_DEFAULT_IS_VALID if current language and DWARF version allow
omitting DW_AT_lower_bound. */ omitting DW_AT_lower_bound. */
@@ -15231,6 +15233,13 @@ @@ -15321,6 +15323,13 @@
break; break;
} }
@ -166,12 +166,12 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2read.c
+ if (!attr_to_dynamic_prop (attr, die, cu, &stride)) + if (!attr_to_dynamic_prop (attr, die, cu, &stride))
+ complaint (&symfile_complaints, _("Missing DW_AT_byte_stride " + complaint (&symfile_complaints, _("Missing DW_AT_byte_stride "
+ "- DIE at 0x%x [in module %s]"), + "- DIE at 0x%x [in module %s]"),
+ die->offset.sect_off, objfile_name (cu->objfile)); + to_underlying (die->sect_off), objfile_name (cu->objfile));
+ +
attr = dwarf2_attr (die, DW_AT_lower_bound, cu); attr = dwarf2_attr (die, DW_AT_lower_bound, cu);
if (attr) if (attr)
attr_to_dynamic_prop (attr, die, cu, &low); attr_to_dynamic_prop (attr, die, cu, &low);
@@ -15307,7 +15316,7 @@ @@ -15397,7 +15406,7 @@
&& !TYPE_UNSIGNED (base_type) && (high.data.const_val & negative_mask)) && !TYPE_UNSIGNED (base_type) && (high.data.const_val & negative_mask))
high.data.const_val |= negative_mask; high.data.const_val |= negative_mask;
@ -180,10 +180,10 @@ Index: gdb-7.12.50.20170226/gdb/dwarf2read.c
if (high_bound_is_count) if (high_bound_is_count)
TYPE_RANGE_DATA (range_type)->flag_upper_bound_is_count = 1; TYPE_RANGE_DATA (range_type)->flag_upper_bound_is_count = 1;
Index: gdb-7.12.50.20170226/gdb/eval.c Index: gdb-7.99.90.20170420/gdb/eval.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/eval.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/eval.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/eval.c 2017-03-01 22:38:05.808017211 +0100 +++ gdb-7.99.90.20170420/gdb/eval.c 2017-04-20 22:26:14.362446600 +0200
@@ -379,29 +379,325 @@ @@ -379,29 +379,325 @@
return index; return index;
} }
@ -608,10 +608,10 @@ Index: gdb-7.12.50.20170226/gdb/eval.c
if ((TYPE_CODE (array_type) != TYPE_CODE_ARRAY)) if ((TYPE_CODE (array_type) != TYPE_CODE_ARRAY))
error (_("Can't get dimensions for a non-array type")); error (_("Can't get dimensions for a non-array type"));
Index: gdb-7.12.50.20170226/gdb/expprint.c Index: gdb-7.99.90.20170420/gdb/expprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/expprint.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/expprint.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/expprint.c 2017-03-01 22:38:05.809017218 +0100 +++ gdb-7.99.90.20170420/gdb/expprint.c 2017-04-20 22:26:14.363446607 +0200
@@ -568,12 +568,10 @@ @@ -568,12 +568,10 @@
*pos += 2; *pos += 2;
@ -662,12 +662,12 @@ Index: gdb-7.12.50.20170226/gdb/expprint.c
elt = dump_subexp (exp, stream, elt); elt = dump_subexp (exp, stream, elt);
} }
break; break;
Index: gdb-7.12.50.20170226/gdb/expression.h Index: gdb-7.99.90.20170420/gdb/expression.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/expression.h 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/expression.h 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/expression.h 2017-03-01 22:38:05.809017218 +0100 +++ gdb-7.99.90.20170420/gdb/expression.h 2017-04-20 22:26:14.363446607 +0200
@@ -154,17 +154,17 @@ @@ -154,17 +154,17 @@
struct ui_file *, char *); struct ui_file *, const char *);
extern void dump_prefix_expression (struct expression *, struct ui_file *); extern void dump_prefix_expression (struct expression *, struct ui_file *);
-/* In an OP_RANGE expression, either bound could be empty, indicating -/* In an OP_RANGE expression, either bound could be empty, indicating
@ -693,10 +693,10 @@ Index: gdb-7.12.50.20170226/gdb/expression.h
}; };
#endif /* !defined (EXPRESSION_H) */ #endif /* !defined (EXPRESSION_H) */
Index: gdb-7.12.50.20170226/gdb/f-exp.y Index: gdb-7.99.90.20170420/gdb/f-exp.y
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/f-exp.y 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/f-exp.y 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/f-exp.y 2017-03-01 22:38:05.809017218 +0100 +++ gdb-7.99.90.20170420/gdb/f-exp.y 2017-04-20 22:26:14.363446607 +0200
@@ -254,31 +254,63 @@ @@ -254,31 +254,63 @@
arglist : arglist ',' exp %prec ABOVE_COMMA arglist : arglist ',' exp %prec ABOVE_COMMA
@ -766,10 +766,10 @@ Index: gdb-7.12.50.20170226/gdb/f-exp.y
write_exp_elt_opcode (pstate, OP_RANGE); } write_exp_elt_opcode (pstate, OP_RANGE); }
; ;
Index: gdb-7.12.50.20170226/gdb/f-valprint.c Index: gdb-7.99.90.20170420/gdb/f-valprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/f-valprint.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/f-valprint.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/f-valprint.c 2017-03-01 22:38:05.809017218 +0100 +++ gdb-7.99.90.20170420/gdb/f-valprint.c 2017-04-20 22:26:14.364446613 +0200
@@ -121,8 +121,14 @@ @@ -121,8 +121,14 @@
if (nss != ndimensions) if (nss != ndimensions)
@ -786,11 +786,11 @@ Index: gdb-7.12.50.20170226/gdb/f-valprint.c
for (i = lowerbound; for (i = lowerbound;
(i < upperbound + 1 && (*elts) < options->print_max); (i < upperbound + 1 && (*elts) < options->print_max);
Index: gdb-7.12.50.20170226/gdb/gdbtypes.c Index: gdb-7.99.90.20170420/gdb/gdbtypes.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/gdbtypes.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/gdbtypes.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/gdbtypes.c 2017-03-01 22:38:05.810017224 +0100 +++ gdb-7.99.90.20170420/gdb/gdbtypes.c 2017-04-20 22:26:14.365446619 +0200
@@ -836,7 +836,8 @@ @@ -862,7 +862,8 @@
struct type * struct type *
create_range_type (struct type *result_type, struct type *index_type, create_range_type (struct type *result_type, struct type *index_type,
const struct dynamic_prop *low_bound, const struct dynamic_prop *low_bound,
@ -800,7 +800,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
{ {
if (result_type == NULL) if (result_type == NULL)
result_type = alloc_type_copy (index_type); result_type = alloc_type_copy (index_type);
@@ -851,6 +852,7 @@ @@ -877,6 +878,7 @@
TYPE_ZALLOC (result_type, sizeof (struct range_bounds)); TYPE_ZALLOC (result_type, sizeof (struct range_bounds));
TYPE_RANGE_DATA (result_type)->low = *low_bound; TYPE_RANGE_DATA (result_type)->low = *low_bound;
TYPE_RANGE_DATA (result_type)->high = *high_bound; TYPE_RANGE_DATA (result_type)->high = *high_bound;
@ -808,7 +808,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
if (low_bound->kind == PROP_CONST && low_bound->data.const_val >= 0) if (low_bound->kind == PROP_CONST && low_bound->data.const_val >= 0)
TYPE_UNSIGNED (result_type) = 1; TYPE_UNSIGNED (result_type) = 1;
@@ -879,7 +881,7 @@ @@ -905,7 +907,7 @@
create_static_range_type (struct type *result_type, struct type *index_type, create_static_range_type (struct type *result_type, struct type *index_type,
LONGEST low_bound, LONGEST high_bound) LONGEST low_bound, LONGEST high_bound)
{ {
@ -817,7 +817,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
low.kind = PROP_CONST; low.kind = PROP_CONST;
low.data.const_val = low_bound; low.data.const_val = low_bound;
@@ -887,7 +889,11 @@ @@ -913,7 +915,11 @@
high.kind = PROP_CONST; high.kind = PROP_CONST;
high.data.const_val = high_bound; high.data.const_val = high_bound;
@ -830,7 +830,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
return result_type; return result_type;
} }
@@ -1084,16 +1090,20 @@ @@ -1110,16 +1116,20 @@
&& (!type_not_associated (result_type) && (!type_not_associated (result_type)
&& !type_not_allocated (result_type))) && !type_not_allocated (result_type)))
{ {
@ -852,7 +852,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
else if (bit_stride > 0) else if (bit_stride > 0)
TYPE_LENGTH (result_type) = TYPE_LENGTH (result_type) =
(bit_stride * (high_bound - low_bound + 1) + 7) / 8; (bit_stride * (high_bound - low_bound + 1) + 7) / 8;
@@ -1886,12 +1896,12 @@ @@ -1912,12 +1922,12 @@
CORE_ADDR value; CORE_ADDR value;
struct type *static_range_type, *static_target_type; struct type *static_range_type, *static_target_type;
const struct dynamic_prop *prop; const struct dynamic_prop *prop;
@ -867,7 +867,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
{ {
low_bound.kind = PROP_CONST; low_bound.kind = PROP_CONST;
low_bound.data.const_val = value; low_bound.data.const_val = value;
@@ -1903,7 +1913,7 @@ @@ -1929,7 +1939,7 @@
} }
prop = &TYPE_RANGE_DATA (dyn_range_type)->high; prop = &TYPE_RANGE_DATA (dyn_range_type)->high;
@ -876,7 +876,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
{ {
high_bound.kind = PROP_CONST; high_bound.kind = PROP_CONST;
high_bound.data.const_val = value; high_bound.data.const_val = value;
@@ -1918,12 +1928,20 @@ @@ -1944,12 +1954,20 @@
high_bound.data.const_val = 0; high_bound.data.const_val = 0;
} }
@ -898,11 +898,11 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.c
TYPE_RANGE_DATA (static_range_type)->flag_bound_evaluated = 1; TYPE_RANGE_DATA (static_range_type)->flag_bound_evaluated = 1;
return static_range_type; return static_range_type;
} }
Index: gdb-7.12.50.20170226/gdb/gdbtypes.h Index: gdb-7.99.90.20170420/gdb/gdbtypes.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/gdbtypes.h 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/gdbtypes.h 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/gdbtypes.h 2017-03-01 22:38:05.811017231 +0100 +++ gdb-7.99.90.20170420/gdb/gdbtypes.h 2017-04-20 22:26:14.365446619 +0200
@@ -550,6 +550,10 @@ @@ -551,6 +551,10 @@
struct dynamic_prop high; struct dynamic_prop high;
@ -913,7 +913,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.h
/* True if HIGH range bound contains the number of elements in the /* True if HIGH range bound contains the number of elements in the
subrange. This affects how the final hight bound is computed. */ subrange. This affects how the final hight bound is computed. */
@@ -712,7 +716,6 @@ @@ -713,7 +717,6 @@
/* * Union member used for range types. */ /* * Union member used for range types. */
struct range_bounds *bounds; struct range_bounds *bounds;
@ -921,7 +921,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.h
} flds_bnds; } flds_bnds;
/* * Slot to point to additional language-specific fields of this /* * Slot to point to additional language-specific fields of this
@@ -1222,6 +1225,15 @@ @@ -1228,6 +1231,15 @@
TYPE_RANGE_DATA(range_type)->high.kind TYPE_RANGE_DATA(range_type)->high.kind
#define TYPE_LOW_BOUND_KIND(range_type) \ #define TYPE_LOW_BOUND_KIND(range_type) \
TYPE_RANGE_DATA(range_type)->low.kind TYPE_RANGE_DATA(range_type)->low.kind
@ -937,7 +937,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.h
/* Property accessors for the type data location. */ /* Property accessors for the type data location. */
#define TYPE_DATA_LOCATION(thistype) \ #define TYPE_DATA_LOCATION(thistype) \
@@ -1256,6 +1268,9 @@ @@ -1262,6 +1274,9 @@
TYPE_HIGH_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype)) TYPE_HIGH_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
#define TYPE_ARRAY_LOWER_BOUND_IS_UNDEFINED(arraytype) \ #define TYPE_ARRAY_LOWER_BOUND_IS_UNDEFINED(arraytype) \
TYPE_LOW_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype)) TYPE_LOW_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
@ -947,7 +947,7 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.h
#define TYPE_ARRAY_UPPER_BOUND_VALUE(arraytype) \ #define TYPE_ARRAY_UPPER_BOUND_VALUE(arraytype) \
(TYPE_HIGH_BOUND(TYPE_INDEX_TYPE((arraytype)))) (TYPE_HIGH_BOUND(TYPE_INDEX_TYPE((arraytype))))
@@ -1765,6 +1780,7 @@ @@ -1776,6 +1791,7 @@
extern struct type *create_range_type (struct type *, struct type *, extern struct type *create_range_type (struct type *, struct type *,
const struct dynamic_prop *, const struct dynamic_prop *,
@ -955,10 +955,10 @@ Index: gdb-7.12.50.20170226/gdb/gdbtypes.h
const struct dynamic_prop *); const struct dynamic_prop *);
extern struct type *create_array_type (struct type *, struct type *, extern struct type *create_array_type (struct type *, struct type *,
Index: gdb-7.12.50.20170226/gdb/parse.c Index: gdb-7.99.90.20170420/gdb/parse.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/parse.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/parse.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/parse.c 2017-03-01 22:38:05.811017231 +0100 +++ gdb-7.99.90.20170420/gdb/parse.c 2017-04-20 22:26:14.366446625 +0200
@@ -1007,22 +1007,20 @@ @@ -1007,22 +1007,20 @@
case OP_RANGE: case OP_RANGE:
@ -993,10 +993,10 @@ Index: gdb-7.12.50.20170226/gdb/parse.c
break; break;
Index: gdb-7.12.50.20170226/gdb/rust-exp.y Index: gdb-7.99.90.20170420/gdb/rust-exp.y
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/rust-exp.y 2017-03-01 22:37:44.045867416 +0100 --- gdb-7.99.90.20170420.orig/gdb/rust-exp.y 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/rust-exp.y 2017-03-01 22:38:05.811017231 +0100 +++ gdb-7.99.90.20170420/gdb/rust-exp.y 2017-04-20 22:26:14.366446625 +0200
@@ -2409,23 +2409,17 @@ @@ -2409,23 +2409,17 @@
case OP_RANGE: case OP_RANGE:
@ -1024,10 +1024,10 @@ Index: gdb-7.12.50.20170226/gdb/rust-exp.y
} }
write_exp_elt_opcode (state, OP_RANGE); write_exp_elt_opcode (state, OP_RANGE);
write_exp_elt_longcst (state, kind); write_exp_elt_longcst (state, kind);
Index: gdb-7.12.50.20170226/gdb/rust-lang.c Index: gdb-7.99.90.20170420/gdb/rust-lang.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/rust-lang.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/rust-lang.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/rust-lang.c 2017-03-01 22:38:05.812017238 +0100 +++ gdb-7.99.90.20170420/gdb/rust-lang.c 2017-04-20 22:26:14.367446632 +0200
@@ -1314,9 +1314,9 @@ @@ -1314,9 +1314,9 @@
kind = (enum range_type) longest_to_int (exp->elts[*pos + 1].longconst); kind = (enum range_type) longest_to_int (exp->elts[*pos + 1].longconst);
*pos += 3; *pos += 3;
@ -1094,10 +1094,10 @@ Index: gdb-7.12.50.20170226/gdb/rust-lang.c
high = high_bound; high = high_bound;
if (high < 0) if (high < 0)
error (_("High index less than zero")); error (_("High index less than zero"));
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/static-arrays.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.exp 2017-03-01 22:38:05.812017238 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/static-arrays.exp 2017-04-20 22:26:14.367446632 +0200
@@ -0,0 +1,421 @@ @@ -0,0 +1,421 @@
+# Copyright 2015 Free Software Foundation, Inc. +# Copyright 2015 Free Software Foundation, Inc.
+# +#
@ -1520,10 +1520,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.exp
+gdb_test "print ar1\(3:7\) = 42" \ +gdb_test "print ar1\(3:7\) = 42" \
+ "Invalid cast." \ + "Invalid cast." \
+ "Assignment of value to subarray" + "Assignment of value to subarray"
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/static-arrays.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.f90 2017-03-01 22:38:05.812017238 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/static-arrays.f90 2017-04-20 22:26:14.368446638 +0200
@@ -0,0 +1,55 @@ @@ -0,0 +1,55 @@
+! Copyright 2015 Free Software Foundation, Inc. +! Copyright 2015 Free Software Foundation, Inc.
+! +!
@ -1580,10 +1580,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/static-arrays.f90
+program testprog +program testprog
+ call sub + call sub
+end +end
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-ptype.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-ptype.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-04-20 22:26:14.368446638 +0200
@@ -98,3 +98,7 @@ @@ -98,3 +98,7 @@
gdb_test "ptype vla2(5, 45, 20)" \ gdb_test "ptype vla2(5, 45, 20)" \
"no such vector element \\\(vector not allocated\\\)" \ "no such vector element \\\(vector not allocated\\\)" \
@ -1592,10 +1592,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-ptype.exp
+gdb_breakpoint [gdb_get_line_number "vla1-neg-bounds"] +gdb_breakpoint [gdb_get_line_number "vla1-neg-bounds"]
+gdb_continue_to_breakpoint "vla1-neg-bounds" +gdb_continue_to_breakpoint "vla1-neg-bounds"
+gdb_test "ptype vla1" "type = $real \\(-2:1,-5:4,-3:-1\\)" "ptype vla1 negative bounds" +gdb_test "ptype vla1" "type = $real \\(-2:1,-5:4,-3:-1\\)" "ptype vla1 negative bounds"
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-sizeof.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-sizeof.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/testsuite/gdb.fortran/vla-sizeof.exp 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla-sizeof.exp 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-sizeof.exp 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-sizeof.exp 2017-04-20 22:26:14.368446638 +0200
@@ -44,3 +44,7 @@ @@ -44,3 +44,7 @@
gdb_breakpoint [gdb_get_line_number "pvla-associated"] gdb_breakpoint [gdb_get_line_number "pvla-associated"]
gdb_continue_to_breakpoint "pvla-associated" gdb_continue_to_breakpoint "pvla-associated"
@ -1604,10 +1604,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-sizeof.exp
+gdb_breakpoint [gdb_get_line_number "vla1-neg-bounds"] +gdb_breakpoint [gdb_get_line_number "vla1-neg-bounds"]
+gdb_continue_to_breakpoint "vla1-neg-bounds" +gdb_continue_to_breakpoint "vla1-neg-bounds"
+gdb_test "print sizeof(vla1)" " = 480" "print sizeof vla1 negative bounds" +gdb_test "print sizeof(vla1)" " = 480" "print sizeof vla1 negative bounds"
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-stride.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.exp 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-stride.exp 2017-04-20 22:26:14.368446638 +0200
@@ -0,0 +1,44 @@ @@ -0,0 +1,44 @@
+# Copyright 2016 Free Software Foundation, Inc. +# Copyright 2016 Free Software Foundation, Inc.
+ +
@ -1653,10 +1653,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.exp
+gdb_continue_to_breakpoint "single-element" +gdb_continue_to_breakpoint "single-element"
+gdb_test "print pvla" " = \\\(5\\\)" "print single-element" +gdb_test "print pvla" " = \\\(5\\\)" "print single-element"
+gdb_test "print pvla(1)" " = 5" "print one single-element" +gdb_test "print pvla(1)" " = 5" "print one single-element"
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-stride.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.f90 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-stride.f90 2017-04-20 22:26:14.368446638 +0200
@@ -0,0 +1,29 @@ @@ -0,0 +1,29 @@
+! Copyright 2016 Free Software Foundation, Inc. +! Copyright 2016 Free Software Foundation, Inc.
+! +!
@ -1687,10 +1687,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla-stride.f90
+ +
+ pvla => null() ! single-element + pvla => null() ! single-element
+end program vla_stride +end program vla_stride
Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla.f90
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/testsuite/gdb.fortran/vla.f90 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla.f90 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla.f90 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla.f90 2017-04-20 22:26:14.368446638 +0200
@@ -54,4 +54,14 @@ @@ -54,4 +54,14 @@
allocate (vla3 (2,2)) ! vla2-deallocated allocate (vla3 (2,2)) ! vla2-deallocated
@ -1706,10 +1706,10 @@ Index: gdb-7.12.50.20170226/gdb/testsuite/gdb.fortran/vla.f90
+ l = allocated(vla1) + l = allocated(vla1)
+ +
end program vla end program vla
Index: gdb-7.12.50.20170226/gdb/valarith.c Index: gdb-7.99.90.20170420/gdb/valarith.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/valarith.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/valarith.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/valarith.c 2017-03-01 22:38:05.813017245 +0100 +++ gdb-7.99.90.20170420/gdb/valarith.c 2017-04-20 22:26:14.369446644 +0200
@@ -193,10 +193,16 @@ @@ -193,10 +193,16 @@
struct type *array_type = check_typedef (value_type (array)); struct type *array_type = check_typedef (value_type (array));
struct type *elt_type = check_typedef (TYPE_TARGET_TYPE (array_type)); struct type *elt_type = check_typedef (TYPE_TARGET_TYPE (array_type));
@ -1729,11 +1729,11 @@ Index: gdb-7.12.50.20170226/gdb/valarith.c
{ {
if (type_not_associated (array_type)) if (type_not_associated (array_type))
error (_("no such vector element (vector not associated)")); error (_("no such vector element (vector not associated)"));
Index: gdb-7.12.50.20170226/gdb/valops.c Index: gdb-7.99.90.20170420/gdb/valops.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/valops.c 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/valops.c 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/valops.c 2017-03-01 23:27:02.466929147 +0100 +++ gdb-7.99.90.20170420/gdb/valops.c 2017-04-20 22:26:14.370446651 +0200
@@ -3782,55 +3782,194 @@ @@ -3786,55 +3786,194 @@
struct value * struct value *
value_slice (struct value *array, int lowbound, int length) value_slice (struct value *array, int lowbound, int length)
{ {
@ -1960,10 +1960,10 @@ Index: gdb-7.12.50.20170226/gdb/valops.c
} }
/* Create a value for a FORTRAN complex number. Currently most of the /* Create a value for a FORTRAN complex number. Currently most of the
Index: gdb-7.12.50.20170226/gdb/value.h Index: gdb-7.99.90.20170420/gdb/value.h
=================================================================== ===================================================================
--- gdb-7.12.50.20170226.orig/gdb/value.h 2017-03-01 22:37:44.046867423 +0100 --- gdb-7.99.90.20170420.orig/gdb/value.h 2017-04-20 22:25:43.973254685 +0200
+++ gdb-7.12.50.20170226/gdb/value.h 2017-03-01 22:38:05.815017259 +0100 +++ gdb-7.99.90.20170420/gdb/value.h 2017-04-20 22:26:14.370446651 +0200
@@ -1106,6 +1106,8 @@ @@ -1106,6 +1106,8 @@
extern struct value *value_slice (struct value *, int, int); extern struct value *value_slice (struct value *, int, int);

View File

@ -23,24 +23,24 @@ git diff --stat -p gdb/master...gdb/users/bheckel/fortran-vla-strings
gdb/valprint.c | 6 -- gdb/valprint.c | 6 --
20 files changed, 827 insertions(+), 110 deletions(-) 20 files changed, 827 insertions(+), 110 deletions(-)
Index: gdb-7.12.50.20170304/gdb/NEWS Index: gdb-7.99.90.20170420/gdb/NEWS
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/NEWS 2017-03-04 21:47:37.491039873 +0100 --- gdb-7.99.90.20170420.orig/gdb/NEWS 2017-04-20 22:27:47.076032111 +0200
+++ gdb-7.12.50.20170304/gdb/NEWS 2017-03-04 21:47:40.283060856 +0100 +++ gdb-7.99.90.20170420/gdb/NEWS 2017-04-20 22:27:49.946050236 +0200
@@ -94,6 +94,8 @@ @@ -1,6 +1,8 @@
The default value is the empty string. Currently, the only supported What has changed in GDB?
targets are ARM, PowerPC and S/390. (Organized release by release)
+* Fortran: Support pointers to dynamic types. +* Fortran: Support pointers to dynamic types.
+ +
*** Changes in GDB 7.12 *** Changes since GDB 7.12
* GDB and GDBserver now build with a C++ compiler by default. * GDB now supports access to the PKU register on GNU/Linux. The register is
Index: gdb-7.12.50.20170304/gdb/c-valprint.c Index: gdb-7.99.90.20170420/gdb/c-valprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/c-valprint.c 2017-03-04 21:47:37.492039881 +0100 --- gdb-7.99.90.20170420.orig/gdb/c-valprint.c 2017-04-20 22:27:47.077032118 +0200
+++ gdb-7.12.50.20170304/gdb/c-valprint.c 2017-03-04 21:47:40.283060856 +0100 +++ gdb-7.99.90.20170420/gdb/c-valprint.c 2017-04-20 22:27:49.947050243 +0200
@@ -646,6 +646,28 @@ @@ -650,6 +650,28 @@
else else
{ {
/* normal case */ /* normal case */
@ -69,11 +69,11 @@ Index: gdb-7.12.50.20170304/gdb/c-valprint.c
fprintf_filtered (stream, "("); fprintf_filtered (stream, "(");
type_print (value_type (val), "", stream, -1); type_print (value_type (val), "", stream, -1);
fprintf_filtered (stream, ") "); fprintf_filtered (stream, ") ");
Index: gdb-7.12.50.20170304/gdb/dwarf2read.c Index: gdb-7.99.90.20170420/gdb/dwarf2read.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/dwarf2read.c 2017-03-04 21:47:37.507039994 +0100 --- gdb-7.99.90.20170420.orig/gdb/dwarf2read.c 2017-04-20 22:27:47.091032206 +0200
+++ gdb-7.12.50.20170304/gdb/dwarf2read.c 2017-03-04 21:47:40.288060894 +0100 +++ gdb-7.99.90.20170420/gdb/dwarf2read.c 2017-04-20 22:28:28.878296105 +0200
@@ -1795,7 +1795,8 @@ @@ -1872,7 +1872,8 @@
static int attr_to_dynamic_prop (const struct attribute *attr, static int attr_to_dynamic_prop (const struct attribute *attr,
struct die_info *die, struct dwarf2_cu *cu, struct die_info *die, struct dwarf2_cu *cu,
@ -83,7 +83,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
/* memory allocation interface */ /* memory allocation interface */
@@ -11491,7 +11492,7 @@ @@ -11557,7 +11558,7 @@
{ {
newobj->static_link newobj->static_link
= XOBNEW (&objfile->objfile_obstack, struct dynamic_prop); = XOBNEW (&objfile->objfile_obstack, struct dynamic_prop);
@ -92,7 +92,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
} }
cu->list_in_scope = &local_symbols; cu->list_in_scope = &local_symbols;
@@ -14718,29 +14719,94 @@ @@ -14791,29 +14792,94 @@
struct gdbarch *gdbarch = get_objfile_arch (objfile); struct gdbarch *gdbarch = get_objfile_arch (objfile);
struct type *type, *range_type, *index_type, *char_type; struct type *type, *range_type, *index_type, *char_type;
struct attribute *attr; struct attribute *attr;
@ -198,7 +198,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
char_type = language_string_char_type (cu->language_defn, gdbarch); char_type = language_string_char_type (cu->language_defn, gdbarch);
type = create_string_type (NULL, char_type, range_type); type = create_string_type (NULL, char_type, range_type);
@@ -15077,7 +15143,8 @@ @@ -15163,7 +15229,8 @@
static int static int
attr_to_dynamic_prop (const struct attribute *attr, struct die_info *die, attr_to_dynamic_prop (const struct attribute *attr, struct die_info *die,
@ -208,7 +208,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
{ {
struct dwarf2_property_baton *baton; struct dwarf2_property_baton *baton;
struct obstack *obstack = &cu->objfile->objfile_obstack; struct obstack *obstack = &cu->objfile->objfile_obstack;
@@ -15087,14 +15154,33 @@ @@ -15173,14 +15240,33 @@
if (attr_form_is_block (attr)) if (attr_form_is_block (attr))
{ {
@ -246,7 +246,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
} }
else if (attr_form_is_ref (attr)) else if (attr_form_is_ref (attr))
{ {
@@ -15127,8 +15213,28 @@ @@ -15213,8 +15299,28 @@
baton = XOBNEW (obstack, struct dwarf2_property_baton); baton = XOBNEW (obstack, struct dwarf2_property_baton);
baton->referenced_type = die_type (target_die, target_cu); baton->referenced_type = die_type (target_die, target_cu);
baton->locexpr.per_cu = cu->per_cu; baton->locexpr.per_cu = cu->per_cu;
@ -277,7 +277,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
prop->data.baton = baton; prop->data.baton = baton;
prop->kind = PROP_LOCEXPR; prop->kind = PROP_LOCEXPR;
gdb_assert (prop->data.baton != NULL); gdb_assert (prop->data.baton != NULL);
@@ -15239,24 +15345,24 @@ @@ -15325,24 +15431,24 @@
attr = dwarf2_attr (die, DW_AT_byte_stride, cu); attr = dwarf2_attr (die, DW_AT_byte_stride, cu);
if (attr) if (attr)
@ -285,7 +285,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
+ if (!attr_to_dynamic_prop (attr, die, cu, &stride, NULL, 0)) + if (!attr_to_dynamic_prop (attr, die, cu, &stride, NULL, 0))
complaint (&symfile_complaints, _("Missing DW_AT_byte_stride " complaint (&symfile_complaints, _("Missing DW_AT_byte_stride "
"- DIE at 0x%x [in module %s]"), "- DIE at 0x%x [in module %s]"),
die->offset.sect_off, objfile_name (cu->objfile)); to_underlying (die->sect_off), objfile_name (cu->objfile));
attr = dwarf2_attr (die, DW_AT_lower_bound, cu); attr = dwarf2_attr (die, DW_AT_lower_bound, cu);
if (attr) if (attr)
@ -294,7 +294,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
else if (!low_default_is_valid) else if (!low_default_is_valid)
complaint (&symfile_complaints, _("Missing DW_AT_lower_bound " complaint (&symfile_complaints, _("Missing DW_AT_lower_bound "
"- DIE at 0x%x [in module %s]"), "- DIE at 0x%x [in module %s]"),
die->offset.sect_off, objfile_name (cu->objfile)); to_underlying (die->sect_off), objfile_name (cu->objfile));
attr = dwarf2_attr (die, DW_AT_upper_bound, cu); attr = dwarf2_attr (die, DW_AT_upper_bound, cu);
- if (!attr_to_dynamic_prop (attr, die, cu, &high)) - if (!attr_to_dynamic_prop (attr, die, cu, &high))
@ -306,7 +306,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
{ {
/* If bounds are constant do the final calculation here. */ /* If bounds are constant do the final calculation here. */
if (low.kind == PROP_CONST && high.kind == PROP_CONST) if (low.kind == PROP_CONST && high.kind == PROP_CONST)
@@ -22871,7 +22977,7 @@ @@ -22967,7 +23073,7 @@
attr = dwarf2_attr (die, DW_AT_allocated, cu); attr = dwarf2_attr (die, DW_AT_allocated, cu);
if (attr_form_is_block (attr)) if (attr_form_is_block (attr))
{ {
@ -315,7 +315,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
add_dyn_prop (DYN_PROP_ALLOCATED, prop, type, objfile); add_dyn_prop (DYN_PROP_ALLOCATED, prop, type, objfile);
} }
else if (attr != NULL) else if (attr != NULL)
@@ -22886,7 +22992,7 @@ @@ -22982,7 +23088,7 @@
attr = dwarf2_attr (die, DW_AT_associated, cu); attr = dwarf2_attr (die, DW_AT_associated, cu);
if (attr_form_is_block (attr)) if (attr_form_is_block (attr))
{ {
@ -324,7 +324,7 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
add_dyn_prop (DYN_PROP_ASSOCIATED, prop, type, objfile); add_dyn_prop (DYN_PROP_ASSOCIATED, prop, type, objfile);
} }
else if (attr != NULL) else if (attr != NULL)
@@ -22899,7 +23005,7 @@ @@ -22995,7 +23101,7 @@
/* Read DW_AT_data_location and set in type. */ /* Read DW_AT_data_location and set in type. */
attr = dwarf2_attr (die, DW_AT_data_location, cu); attr = dwarf2_attr (die, DW_AT_data_location, cu);
@ -333,10 +333,10 @@ Index: gdb-7.12.50.20170304/gdb/dwarf2read.c
add_dyn_prop (DYN_PROP_DATA_LOCATION, prop, type, objfile); add_dyn_prop (DYN_PROP_DATA_LOCATION, prop, type, objfile);
if (dwarf2_per_objfile->die_type_hash == NULL) if (dwarf2_per_objfile->die_type_hash == NULL)
Index: gdb-7.12.50.20170304/gdb/f-typeprint.c Index: gdb-7.99.90.20170420/gdb/f-typeprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/f-typeprint.c 2017-03-04 21:47:27.789966966 +0100 --- gdb-7.99.90.20170420.orig/gdb/f-typeprint.c 2017-04-20 22:27:26.288900835 +0200
+++ gdb-7.12.50.20170304/gdb/f-typeprint.c 2017-03-04 21:48:22.163375604 +0100 +++ gdb-7.99.90.20170420/gdb/f-typeprint.c 2017-04-20 22:27:49.953050280 +0200
@@ -37,7 +37,7 @@ @@ -37,7 +37,7 @@
#endif #endif
@ -486,11 +486,11 @@ Index: gdb-7.12.50.20170304/gdb/f-typeprint.c
fputs_filtered ("\n", stream); fputs_filtered ("\n", stream);
} }
fprintfi_filtered (level, stream, "End Type "); fprintfi_filtered (level, stream, "End Type ");
Index: gdb-7.12.50.20170304/gdb/gdbtypes.c Index: gdb-7.99.90.20170420/gdb/gdbtypes.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/gdbtypes.c 2017-03-04 21:47:37.510040016 +0100 --- gdb-7.99.90.20170420.orig/gdb/gdbtypes.c 2017-04-20 22:27:47.093032219 +0200
+++ gdb-7.12.50.20170304/gdb/gdbtypes.c 2017-03-04 21:47:40.289060902 +0100 +++ gdb-7.99.90.20170420/gdb/gdbtypes.c 2017-04-20 22:27:49.954050287 +0200
@@ -1814,7 +1814,8 @@ @@ -1840,7 +1840,8 @@
type = check_typedef (type); type = check_typedef (type);
/* We only want to recognize references at the outermost level. */ /* We only want to recognize references at the outermost level. */
@ -500,7 +500,7 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
type = check_typedef (TYPE_TARGET_TYPE (type)); type = check_typedef (TYPE_TARGET_TYPE (type));
/* Types that have a dynamic TYPE_DATA_LOCATION are considered /* Types that have a dynamic TYPE_DATA_LOCATION are considered
@@ -1848,6 +1849,7 @@ @@ -1874,6 +1875,7 @@
} }
case TYPE_CODE_ARRAY: case TYPE_CODE_ARRAY:
@ -508,7 +508,7 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
{ {
gdb_assert (TYPE_NFIELDS (type) == 1); gdb_assert (TYPE_NFIELDS (type) == 1);
@@ -1960,7 +1962,8 @@ @@ -1986,7 +1988,8 @@
struct type *ary_dim; struct type *ary_dim;
struct dynamic_prop *prop; struct dynamic_prop *prop;
@ -518,7 +518,7 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
type = copy_type (type); type = copy_type (type);
@@ -1985,13 +1988,17 @@ @@ -2011,13 +2014,17 @@
ary_dim = check_typedef (TYPE_TARGET_TYPE (elt_type)); ary_dim = check_typedef (TYPE_TARGET_TYPE (elt_type));
@ -539,7 +539,7 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
} }
/* Resolve dynamic bounds of members of the union TYPE to static /* Resolve dynamic bounds of members of the union TYPE to static
@@ -2121,6 +2128,28 @@ @@ -2147,6 +2154,28 @@
return resolved_type; return resolved_type;
} }
@ -568,7 +568,7 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
/* Worker for resolved_dynamic_type. */ /* Worker for resolved_dynamic_type. */
static struct type * static struct type *
@@ -2169,7 +2198,12 @@ @@ -2195,7 +2224,12 @@
break; break;
} }
@ -581,10 +581,10 @@ Index: gdb-7.12.50.20170304/gdb/gdbtypes.c
resolved_type = resolve_dynamic_array (type, addr_stack); resolved_type = resolve_dynamic_array (type, addr_stack);
break; break;
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.cc Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.cp/vla-cxx.cc
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.cp/vla-cxx.cc 2017-03-04 21:47:37.511040023 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.cp/vla-cxx.cc 2017-04-20 22:27:47.094032225 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.cc 2017-03-04 21:47:40.289060902 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.cp/vla-cxx.cc 2017-04-20 22:27:49.955050293 +0200
@@ -15,6 +15,10 @@ @@ -15,6 +15,10 @@
You should have received a copy of the GNU General Public License You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>. */ along with this program. If not, see <http://www.gnu.org/licenses/>. */
@ -613,10 +613,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.cc
+ +
return vla[2]; return vla[2];
} }
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.cp/vla-cxx.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.cp/vla-cxx.exp 2017-03-04 21:47:37.511040023 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.cp/vla-cxx.exp 2017-04-20 22:27:47.094032225 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.exp 2017-03-04 21:47:40.290060909 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.cp/vla-cxx.exp 2017-04-20 22:27:49.955050293 +0200
@@ -23,6 +23,12 @@ @@ -23,6 +23,12 @@
return -1 return -1
} }
@ -637,10 +637,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.cp/vla-cxx.exp
+gdb_test "ptype ptr" "int \\(\\*\\)\\\[3\\\]" +gdb_test "ptype ptr" "int \\(\\*\\)\\\[3\\\]"
+gdb_test "print ptr" "\\(int \\(\\*\\)\\\[3\\\]\\) $hex" +gdb_test "print ptr" "\\(int \\(\\*\\)\\\[3\\\]\\) $hex"
+gdb_test "print *ptr" " = \\{5, 7, 9\\}" +gdb_test "print *ptr" " = \\{5, 7, 9\\}"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/pointers.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.exp 2017-03-04 21:47:40.290060909 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/pointers.exp 2017-04-20 22:27:49.955050293 +0200
@@ -0,0 +1,143 @@ @@ -0,0 +1,143 @@
+# Copyright 2016 Free Software Foundation, Inc. +# Copyright 2016 Free Software Foundation, Inc.
+ +
@ -785,10 +785,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.exp
+gdb_test "print *((integer*) &inta + 2)" "= 3" "print temporary pointer, array" +gdb_test "print *((integer*) &inta + 2)" "= 3" "print temporary pointer, array"
+gdb_test "print *((integer*) &intvla + 3)" "= 4" "print temporary pointer, allocated vla" +gdb_test "print *((integer*) &intvla + 3)" "= 4" "print temporary pointer, allocated vla"
+gdb_test "print \$pc" "= \\(PTR TO -> \\( void \\(\\)\\(\\)\\)\\) $hex <pointers\\+\\d+>" "Print program counter" +gdb_test "print \$pc" "= \\(PTR TO -> \\( void \\(\\)\\(\\)\\)\\) $hex <pointers\\+\\d+>" "Print program counter"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/pointers.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.f90 2017-03-04 21:47:40.290060909 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/pointers.f90 2017-04-20 22:27:49.955050293 +0200
@@ -0,0 +1,109 @@ @@ -0,0 +1,109 @@
+! Copyright 2016 Free Software Foundation, Inc. +! Copyright 2016 Free Software Foundation, Inc.
+! +!
@ -899,10 +899,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/pointers.f90
+ intv = intv + 1 ! After value assignment + intv = intv + 1 ! After value assignment
+ +
+end program pointers +end program pointers
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/print_type.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/print_type.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/print_type.exp 2017-03-04 21:47:40.290060909 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/print_type.exp 2017-04-20 22:27:49.956050299 +0200
@@ -0,0 +1,100 @@ @@ -0,0 +1,100 @@
+# Copyright 2016 Free Software Foundation, Inc. +# Copyright 2016 Free Software Foundation, Inc.
+ +
@ -1004,10 +1004,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/print_type.exp
+ } + }
+} +}
+gdb_test "ptype realp" "type = PTR TO -> \\( $real \\)" +gdb_test "ptype realp" "type = PTR TO -> \\( $real \\)"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-ptype.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-ptype.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-03-04 21:47:37.512040031 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-04-20 22:27:47.094032225 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-ptype.exp 2017-04-20 22:27:49.956050299 +0200
@@ -32,9 +32,9 @@ @@ -32,9 +32,9 @@
# Check the ptype of various VLA states and pointer to VLA's. # Check the ptype of various VLA states and pointer to VLA's.
gdb_breakpoint [gdb_get_line_number "vla1-init"] gdb_breakpoint [gdb_get_line_number "vla1-init"]
@ -1045,10 +1045,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-ptype.exp
gdb_test "ptype vla2(5, 45, 20)" \ gdb_test "ptype vla2(5, 45, 20)" \
"no such vector element \\\(vector not allocated\\\)" \ "no such vector element \\\(vector not allocated\\\)" \
"ptype vla2(5, 45, 20) not allocated" "ptype vla2(5, 45, 20) not allocated"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-strings.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.exp 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-strings.exp 2017-04-20 22:27:49.956050299 +0200
@@ -0,0 +1,103 @@ @@ -0,0 +1,103 @@
+# Copyright 2016 Free Software Foundation, Inc. +# Copyright 2016 Free Software Foundation, Inc.
+ +
@ -1153,10 +1153,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.exp
+ pass $test + pass $test
+ } + }
+} +}
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-strings.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.f90 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-strings.f90 2017-04-20 22:27:49.956050299 +0200
@@ -0,0 +1,39 @@ @@ -0,0 +1,39 @@
+! Copyright 2016 Free Software Foundation, Inc. +! Copyright 2016 Free Software Foundation, Inc.
+! +!
@ -1197,10 +1197,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-strings.f90
+ var_char_p => null() + var_char_p => null()
+ l = associated(var_char_p) ! var_char_p-not-associated + l = associated(var_char_p) ! var_char_p-not-associated
+end program vla_strings +end program vla_strings
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-type.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-type.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.fortran/vla-type.exp 2017-03-04 21:47:37.512040031 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla-type.exp 2017-04-20 22:27:47.094032225 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-type.exp 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-type.exp 2017-04-20 22:27:49.956050299 +0200
@@ -132,7 +132,10 @@ @@ -132,7 +132,10 @@
"End Type one" ] "End Type one" ]
@ -1222,10 +1222,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-type.exp
"End Type one" ] \ "End Type one" ] \
"ptype fivedynarr(2)%tone, not allocated" "ptype fivedynarr(2)%tone, not allocated"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-value.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-value.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.fortran/vla-value.exp 2017-03-04 21:47:37.512040031 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.fortran/vla-value.exp 2017-04-20 22:27:47.095032231 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-value.exp 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/vla-value.exp 2017-04-20 22:27:49.957050306 +0200
@@ -14,6 +14,7 @@ @@ -14,6 +14,7 @@
# along with this program. If not, see <http://www.gnu.org/licenses/>. # along with this program. If not, see <http://www.gnu.org/licenses/>.
@ -1278,10 +1278,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.fortran/vla-value.exp
"print associated &pvla" "print associated &pvla"
gdb_test "print pvla(3, 6, 9)" " = 42" "print associated pvla(3,6,9)" gdb_test "print pvla(3, 6, 9)" " = 42" "print associated pvla(3,6,9)"
gdb_test "print pvla(1, 3, 8)" " = 1001" "print associated pvla(1,3,8)" gdb_test "print pvla(1, 3, 8)" " = 1001" "print associated pvla(1,3,8)"
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-var-child-f.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.mi/mi-var-child-f.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.mi/mi-var-child-f.exp 2017-03-04 21:47:37.513040039 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.mi/mi-var-child-f.exp 2017-04-20 22:27:47.095032231 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-var-child-f.exp 2017-03-04 21:47:40.291060917 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.mi/mi-var-child-f.exp 2017-04-20 22:27:49.957050306 +0200
@@ -17,6 +17,7 @@ @@ -17,6 +17,7 @@
load_lib mi-support.exp load_lib mi-support.exp
@ -1303,10 +1303,10 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-var-child-f.exp
set children [list [list "array.-1" "-1" 2 "$int4 \\(2\\)"] \ set children [list [list "array.-1" "-1" 2 "$int4 \\(2\\)"] \
[list "array.0" "0" 2 "$int4 \\(2\\)"] \ [list "array.0" "0" 2 "$int4 \\(2\\)"] \
Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-vla-fortran.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.mi/mi-vla-fortran.exp
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/testsuite/gdb.mi/mi-vla-fortran.exp 2017-03-04 21:47:37.513040039 +0100 --- gdb-7.99.90.20170420.orig/gdb/testsuite/gdb.mi/mi-vla-fortran.exp 2017-04-20 22:27:47.095032231 +0200
+++ gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-vla-fortran.exp 2017-03-04 21:47:40.292060924 +0100 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.mi/mi-vla-fortran.exp 2017-04-20 22:27:49.957050306 +0200
@@ -17,7 +17,9 @@ @@ -17,7 +17,9 @@
# Array (VLA). # Array (VLA).
@ -1405,11 +1405,11 @@ Index: gdb-7.12.50.20170304/gdb/testsuite/gdb.mi/mi-vla-fortran.exp
"info type variable pvla2_associated" "info type variable pvla2_associated"
mi_gdb_test "592-var-show-format pvla2_associated" \ mi_gdb_test "592-var-show-format pvla2_associated" \
"592\\^done,format=\"natural\"" \ "592\\^done,format=\"natural\"" \
Index: gdb-7.12.50.20170304/gdb/typeprint.c Index: gdb-7.99.90.20170420/gdb/typeprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/typeprint.c 2017-03-04 21:47:37.513040039 +0100 --- gdb-7.99.90.20170420.orig/gdb/typeprint.c 2017-04-20 22:27:47.095032231 +0200
+++ gdb-7.12.50.20170304/gdb/typeprint.c 2017-03-04 21:47:40.292060924 +0100 +++ gdb-7.99.90.20170420/gdb/typeprint.c 2017-04-20 22:27:49.957050306 +0200
@@ -475,6 +475,25 @@ @@ -474,6 +474,25 @@
printf_filtered (" */\n"); printf_filtered (" */\n");
} }
@ -1435,11 +1435,11 @@ Index: gdb-7.12.50.20170304/gdb/typeprint.c
LA_PRINT_TYPE (type, "", gdb_stdout, show, 0, &flags); LA_PRINT_TYPE (type, "", gdb_stdout, show, 0, &flags);
printf_filtered ("\n"); printf_filtered ("\n");
Index: gdb-7.12.50.20170304/gdb/valops.c Index: gdb-7.99.90.20170420/gdb/valops.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/valops.c 2017-03-04 21:47:37.514040046 +0100 --- gdb-7.99.90.20170420.orig/gdb/valops.c 2017-04-20 22:27:47.096032238 +0200
+++ gdb-7.12.50.20170304/gdb/valops.c 2017-03-04 21:47:40.293060932 +0100 +++ gdb-7.99.90.20170420/gdb/valops.c 2017-04-20 22:27:49.958050312 +0200
@@ -1569,6 +1569,19 @@ @@ -1574,6 +1574,19 @@
if (TYPE_CODE (base_type) == TYPE_CODE_PTR) if (TYPE_CODE (base_type) == TYPE_CODE_PTR)
{ {
struct type *enc_type; struct type *enc_type;
@ -1459,7 +1459,7 @@ Index: gdb-7.12.50.20170304/gdb/valops.c
/* We may be pointing to something embedded in a larger object. /* We may be pointing to something embedded in a larger object.
Get the real type of the enclosing object. */ Get the real type of the enclosing object. */
@@ -1584,8 +1597,7 @@ @@ -1589,8 +1602,7 @@
else else
/* Retrieve the enclosing object pointed to. */ /* Retrieve the enclosing object pointed to. */
arg2 = value_at_lazy (enc_type, arg2 = value_at_lazy (enc_type,
@ -1469,11 +1469,11 @@ Index: gdb-7.12.50.20170304/gdb/valops.c
enc_type = value_type (arg2); enc_type = value_type (arg2);
return readjust_indirect_value_type (arg2, enc_type, base_type, arg1); return readjust_indirect_value_type (arg2, enc_type, base_type, arg1);
Index: gdb-7.12.50.20170304/gdb/valprint.c Index: gdb-7.99.90.20170420/gdb/valprint.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170304.orig/gdb/valprint.c 2017-03-04 02:49:09.000000000 +0100 --- gdb-7.99.90.20170420.orig/gdb/valprint.c 2017-04-20 22:25:38.224218378 +0200
+++ gdb-7.12.50.20170304/gdb/valprint.c 2017-03-04 21:47:40.293060932 +0100 +++ gdb-7.99.90.20170420/gdb/valprint.c 2017-04-20 22:27:49.959050318 +0200
@@ -1165,12 +1165,6 @@ @@ -1166,12 +1166,6 @@
return 0; return 0;
} }

View File

@ -27,19 +27,19 @@ cannot reproduce it.
Thanks, Thanks,
Jan Jan
Index: gdb-7.12.50.20170309/gdb/dwarf2loc.c Index: gdb-7.99.90.20170420/gdb/dwarf2loc.c
=================================================================== ===================================================================
--- gdb-7.12.50.20170309.orig/gdb/dwarf2loc.c 2017-04-19 22:04:04.874320326 +0200 --- gdb-7.99.90.20170420.orig/gdb/dwarf2loc.c 2017-04-20 22:28:59.686490666 +0200
+++ gdb-7.12.50.20170309/gdb/dwarf2loc.c 2017-04-19 22:09:07.976201875 +0200 +++ gdb-7.99.90.20170420/gdb/dwarf2loc.c 2017-04-20 22:29:13.104575404 +0200
@@ -42,6 +42,7 @@ @@ -42,6 +42,7 @@
#include <algorithm> #include <algorithm>
#include <vector> #include <vector>
#include <unordered_set> #include <unordered_set>
+#include <functional> +#include <functional>
#include "common/underlying.h"
extern int dwarf_always_disassemble; extern int dwarf_always_disassemble;
@@ -2366,6 +2367,20 @@
@@ -2350,6 +2351,20 @@
ctx.per_cu = per_cu; ctx.per_cu = per_cu;
ctx.obj_address = 0; ctx.obj_address = 0;
@ -60,10 +60,10 @@ Index: gdb-7.12.50.20170309/gdb/dwarf2loc.c
scoped_value_mark free_values; scoped_value_mark free_values;
ctx.gdbarch = get_objfile_arch (objfile); ctx.gdbarch = get_objfile_arch (objfile);
Index: gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90 2017-04-19 22:04:04.922320623 +0200 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90 2017-04-20 22:29:00.673496899 +0200
@@ -0,0 +1,24 @@ @@ -0,0 +1,24 @@
+! Copyright 2010 Free Software Foundation, Inc. +! Copyright 2010 Free Software Foundation, Inc.
+! +!
@ -89,10 +89,10 @@ Index: gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f
+ real :: dummy + real :: dummy
+ dummy = 1 + dummy = 1
+end subroutine bar +end subroutine bar
Index: gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp 2017-04-19 22:04:04.922320623 +0200 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp 2017-04-20 22:29:00.673496899 +0200
@@ -0,0 +1,39 @@ @@ -0,0 +1,39 @@
+# Copyright 2010 Free Software Foundation, Inc. +# Copyright 2010 Free Software Foundation, Inc.
+ +
@ -133,10 +133,10 @@ Index: gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
+} +}
+ +
+gdb_test "bt" {foo \(string='hello'.*} +gdb_test "bt" {foo \(string='hello'.*}
Index: gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90 Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
=================================================================== ===================================================================
--- /dev/null 1970-01-01 00:00:00.000000000 +0000 --- /dev/null 1970-01-01 00:00:00.000000000 +0000
+++ gdb-7.12.50.20170309/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90 2017-04-19 22:04:04.922320623 +0200 +++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90 2017-04-20 22:29:00.673496899 +0200
@@ -0,0 +1,36 @@ @@ -0,0 +1,36 @@
+! Copyright 2010 Free Software Foundation, Inc. +! Copyright 2010 Free Software Foundation, Inc.
+! +!

View File

@ -18,15 +18,15 @@
Name: %{?scl_prefix}gdb Name: %{?scl_prefix}gdb
# Freeze it when GDB gets branched # Freeze it when GDB gets branched
%global snapsrc 20170309 %global snapsrc 20170420
# See timestamp of source gnulib installed into gdb/gnulib/ . # See timestamp of source gnulib installed into gdb/gnulib/ .
%global snapgnulib 20150822 %global snapgnulib 20150822
%global tarname gdb-%{version} %global tarname gdb-%{version}
Version: 7.12.50.%{snapsrc} Version: 7.99.90.%{snapsrc}
# The release always contains a leading reserved number, start it at 1. # The release always contains a leading reserved number, start it at 1.
# `upstream' is not a part of `name' to stay fully rpm dependencies compatible for the testing. # `upstream' is not a part of `name' to stay fully rpm dependencies compatible for the testing.
Release: 7%{?dist} Release: 8%{?dist}
License: GPLv3+ and GPLv3+ with exceptions and GPLv2+ and GPLv2+ with exceptions and GPL+ and LGPLv2+ and LGPLv3+ and BSD and Public Domain and GFDL License: GPLv3+ and GPLv3+ with exceptions and GPLv2+ and GPLv2+ with exceptions and GPL+ and LGPLv2+ and LGPLv3+ and BSD and Public Domain and GFDL
Group: Development/Debuggers Group: Development/Debuggers
@ -638,6 +638,9 @@ Patch1153: gdb-add-index-chmod.patch
# New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387). # New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387).
Patch1155: gdb-rhbz1398387-tab-crash-test.patch Patch1155: gdb-rhbz1398387-tab-crash-test.patch
# Release branch: Fix: --enable-werror
Patch1170: gdb-release-werror.patch
%if 0%{!?rhel:1} || 0%{?rhel} > 6 %if 0%{!?rhel:1} || 0%{?rhel} > 6
# RL_STATE_FEDORA_GDB would not be found for: # RL_STATE_FEDORA_GDB would not be found for:
# Patch642: gdb-readline62-ask-more-rh.patch # Patch642: gdb-readline62-ask-more-rh.patch
@ -1009,6 +1012,7 @@ done
%patch1152 -p1 %patch1152 -p1
%patch1153 -p1 %patch1153 -p1
%patch1155 -p1 %patch1155 -p1
%patch1170 -p1
%patch1075 -p1 %patch1075 -p1
%if 0%{?rhel:1} && 0%{?rhel} <= 7 %if 0%{?rhel:1} && 0%{?rhel} <= 7
@ -1576,6 +1580,9 @@ then
fi fi
%changelog %changelog
* Fri Apr 21 2017 Jan Kratochvil <jan.kratochvil@redhat.com> - 7.99.90.20170420-8.fc26
- Rebase to FSF GDB 7.99.90.20170420 (pre-8.0 stable branch).
* Wed Apr 19 2017 Jan Kratochvil <jan.kratochvil@redhat.com> - 7.12.50.20170309-7.fc26 * Wed Apr 19 2017 Jan Kratochvil <jan.kratochvil@redhat.com> - 7.12.50.20170309-7.fc26
- Fix reported gdb-vla-intel-stringbt-fix.patch regression (SuSE). - Fix reported gdb-vla-intel-stringbt-fix.patch regression (SuSE).
- Remove gcc-7 compilation compatibility hack. - Remove gcc-7 compilation compatibility hack.

View File

@ -1,3 +1,3 @@
SHA512 (gdb-libstdc++-v3-python-6.3.1-20170212.tar.xz) = 22ad4187d6bb9851ecf389c3ff4c68f33ccf5602d8f51bc337215c700d56c9073b3fb40ece3f58901315161f76a4fd1d6463c623650317ad96fd9e3f4aba7252 SHA512 (gdb-libstdc++-v3-python-6.3.1-20170212.tar.xz) = 22ad4187d6bb9851ecf389c3ff4c68f33ccf5602d8f51bc337215c700d56c9073b3fb40ece3f58901315161f76a4fd1d6463c623650317ad96fd9e3f4aba7252
SHA512 (v1.5.tar.gz) = ea3e76291d5b077d5b42061898a1f70af6cbdbccb7d05c59904f322ca1c03f7596cac6a966b80b12d2c2d86212f17d6bde02b1daf92be62e49abcb234e2bacbd SHA512 (v1.5.tar.gz) = ea3e76291d5b077d5b42061898a1f70af6cbdbccb7d05c59904f322ca1c03f7596cac6a966b80b12d2c2d86212f17d6bde02b1daf92be62e49abcb234e2bacbd
SHA512 (gdb-7.12.50.20170309.tar.xz) = 2aa38d71cb769c623f739f77e5e47c8c2b73f9bcfc4978841c881dfb002fb2ce084e7f7cd7248fe2a0455e487b77d1c0fa17edcbcdd2c43d85ba4de043d26427 SHA512 (gdb-7.99.90.20170420.tar.xz) = 8fe8e2a69a94d3ea8861a2aaeb46cd3e3e8423efe0a74a7bb336ee0df301321f693f360166518b3f595c94bfad893fb708c92962f79bae13b6564db027a1516f