- up to 8.1

[packages/gdb.git] / gdb-vla-intel-stringbt-fix.patch

diff --git a/gdb-vla-intel-stringbt-fix.patch b/gdb-vla-intel-stringbt-fix.patch
index f39d1cf0f9241bddeee82af4378e26f0bab371d4..6f4c625d23291b187ff14bcac4cd4d89e9407242 100644 (file)
--- a/gdb-vla-intel-stringbt-fix.patch
+++ b/gdb-vla-intel-stringbt-fix.patch
@@ -1,10 +1,14 @@
-http://sourceware.org/ml/gdb-patches/2014-08/msg00025.html
-Subject: [patch 1/2] Re: Crash regression(?) printing Fortran strings in bt  [Re: [V2 00/23] Fortran dynamic array support]
+From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
+From: Jan Kratochvil <jan.kratochvil@redhat.com>
+Date: Fri, 1 Aug 2014 23:02:17 +0200
+Subject: Crash regression(?) printing Fortran strings in bt [Re: [V2 00/23]
+ Fortran dynamic array support]
+
+FileName: gdb-vla-intel-stringbt-fix.patch
 
+;;=push+jan
 
---FCuugMFkClbJLl1L
-Content-Type: text/plain; charset=us-ascii
-Content-Disposition: inline
+http://sourceware.org/ml/gdb-patches/2014-08/msg00025.html
 
 On Fri, 01 Aug 2014 09:20:19 +0200, Keven Boell wrote:
 > I just tried it on Fedora 20 i686.  Applied the patch, you mentioned, on top of
@@ -23,23 +27,31 @@ so that there is no longer needed the patch:
 The fix below has no regressions for me.  Unfortunately I do not see why you
 cannot reproduce it.
 
-
 Thanks,
 Jan
+---
+ gdb/dwarf2loc.c                                    | 15 +++++++++
+ .../gdb.fortran/dynamic-other-frame-stub.f90       | 24 +++++++++++++
+ gdb/testsuite/gdb.fortran/dynamic-other-frame.exp  | 39 ++++++++++++++++++++++
+ gdb/testsuite/gdb.fortran/dynamic-other-frame.f90  | 36 ++++++++++++++++++++
+ 4 files changed, 114 insertions(+)
+ create mode 100644 gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
+ create mode 100644 gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
+ create mode 100644 gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
 
-Index: gdb-7.99.90.20170420/gdb/dwarf2loc.c
-===================================================================
---- gdb-7.99.90.20170420.orig/gdb/dwarf2loc.c  2017-04-20 22:28:59.686490666 +0200
-+++ gdb-7.99.90.20170420/gdb/dwarf2loc.c       2017-04-20 22:29:13.104575404 +0200
+diff --git a/gdb/dwarf2loc.c b/gdb/dwarf2loc.c
+index 5105c8d23a..5486e4dc12 100644
+--- a/gdb/dwarf2loc.c
++++ b/gdb/dwarf2loc.c
 @@ -42,6 +42,7 @@
  #include <algorithm>
  #include <vector>
  #include <unordered_set>
 +#include <functional>
  #include "common/underlying.h"
+ #include "common/byte-vector.h"
  
- extern int dwarf_always_disassemble;
-@@ -2366,6 +2367,20 @@
+@@ -2348,6 +2349,20 @@ dwarf2_evaluate_loc_desc_full (struct type *type, struct frame_info *frame,
    ctx.per_cu = per_cu;
    ctx.obj_address = 0;
  
@@ -60,10 +72,11 @@ Index: gdb-7.99.90.20170420/gdb/dwarf2loc.c
    scoped_value_mark free_values;
  
    ctx.gdbarch = get_objfile_arch (objfile);
-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
-+++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90        2017-04-20 22:29:00.673496899 +0200
+diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90 b/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
+new file mode 100644
+index 0000000000..261ce17ae5
+--- /dev/null
++++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
 @@ -0,0 +1,24 @@
 +! Copyright 2010 Free Software Foundation, Inc.
 +!
@@ -89,10 +102,11 @@ Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f
 +  real :: dummy
 +  dummy = 1
 +end subroutine bar
-Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
-===================================================================
---- /dev/null  1970-01-01 00:00:00.000000000 +0000
-+++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp     2017-04-20 22:29:00.673496899 +0200
+diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp b/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
+new file mode 100644
+index 0000000000..570a28ca65
+--- /dev/null
++++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
 @@ -0,0 +1,39 @@
 +# Copyright 2010 Free Software Foundation, Inc.
 +
@@ -133,10 +147,11 @@ Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
 +}
 +
 +gdb_test "bt" {foo \(string='hello'.*}
-Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
-===================================================================
---- /dev/null  1970-01-01 00:00:00.000000000 +0000
-+++ gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90     2017-04-20 22:29:00.673496899 +0200
+diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90 b/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
+new file mode 100644
+index 0000000000..2bc637db49
+--- /dev/null
++++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
 @@ -0,0 +1,36 @@
 +! Copyright 2010 Free Software Foundation, Inc.
 +!
@@ -174,3 +189,6 @@ Index: gdb-7.99.90.20170420/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
 +  end interface
 +  call foo ('hello')
 +end
+-- 
+2.14.3
+