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 cc1b6b4d9fa6b4e4344915239a2a58c8c56b275f..ecbb87f4174a739fe34dfbbc00b902dd745657fd 100644 (file)
--- 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 e16c3c8ef87256675c974f84309547f14fce13d0..440fd2586f1ce8d0637a28c5664c1b6428174286 100644 (file)
--- 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