From: Martin Liska <mliska@suse.cz>
Date: Thu, 30 May 2019 07:50:39 +0000 (+0200)
Subject: gdbinit: add a new command and fix one
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=7c83619cd6492080ae25313b88f7b9052908681b;p=gcc.git

gdbinit: add a new command and fix one

2019-05-30  Martin Liska  <mliska@suse.cz>

	* gdbinit.in: Fix 'ptc' command.  Add trt
	that prints TREE_TYPE($).

From-SVN: r271763
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index cc1b6b4d9fa..ecbb87f4174 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2019-05-30  Martin Liska  <mliska@suse.cz>
+
+	* gdbinit.in: Fix 'ptc' command.  Add trt
+	that prints TREE_TYPE($).
+
 2019-05-29  Bill Schmidt  <wschmidt@linux.ibm.com>
 	    Alan Modra  <amodra@gmail.com>
 
diff --git a/gcc/gdbinit.in b/gcc/gdbinit.in
index e16c3c8ef87..440fd2586f1 100644
--- a/gcc/gdbinit.in
+++ b/gcc/gdbinit.in
@@ -113,7 +113,7 @@ Works only when an inferior is executing.
 end
 
 define ptc
-output (enum tree_code) $.common.code
+output (enum tree_code) $.base.code
 echo \n
 end
 
@@ -201,6 +201,14 @@ document pcfun
 Print current function.
 end
 
+define trt
+print ($.typed.type)
+end
+
+document trt
+Print TREE_TYPE of the tree node that is $
+end
+
 define break-on-diagnostic
 break diagnostic_show_locus
 end