]> git.ipfire.org Git - thirdparty/gcc.git/blob - gcc/gdbinit.in
* gdbinit.in (pcfun): Define and document.
[thirdparty/gcc.git] / gcc / gdbinit.in
1 # Copyright (C) 2001-2015 Free Software Foundation, Inc.
2 #
3 # This file is part of GCC.
4 #
5 # GCC is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 3, or (at your option)
8 # any later version.
9 #
10 # GCC is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
14 #
15 # You should have received a copy of the GNU General Public License
16 # along with GCC; see the file COPYING3. If not see
17 # <http://www.gnu.org/licenses/>.
18
19 define pr
20 set debug_rtx ($)
21 end
22
23 document pr
24 Print the full structure of the rtx that is $.
25 Works only when an inferior is executing.
26 end
27
28 define prl
29 set debug_rtx_list ($, debug_rtx_count)
30 end
31
32 document prl
33 Print the full structure of all rtx insns beginning at $.
34 Works only when an inferior is executing.
35 Uses variable debug_rtx_count to control number of insns printed:
36 debug_rtx_count > 0: print from $ on.
37 debug_rtx_count < 0: print a window around $.
38
39 There is also debug_rtx_find (rtx, uid) that will scan a list for UID and print
40 it using debug_rtx_list. Usage example: set $foo=debug_rtx_find(first, 42)
41 end
42
43 define pt
44 set debug_tree ($)
45 end
46
47 document pt
48 Print the full structure of the tree that is $.
49 Works only when an inferior is executing.
50 end
51
52 define pct
53 set debug_c_tree ($)
54 end
55
56 document pct
57 Print the tree that is $ in C syntax.
58 Works only when an inferior is executing.
59 end
60
61 define pgg
62 set debug_gimple_stmt ($)
63 end
64
65 document pgg
66 Print the Gimple statement that is $ in C syntax.
67 Works only when an inferior is executing.
68 end
69
70 define pgq
71 set debug_gimple_seq ($)
72 end
73
74 document pgq
75 Print the Gimple sequence that is $ in C syntax.
76 Works only when an inferior is executing.
77 end
78
79 define pgs
80 set debug_generic_stmt ($)
81 end
82
83 document pgs
84 Print the statement that is $ in C syntax.
85 Works only when an inferior is executing.
86 end
87
88 define pge
89 set debug_generic_expr ($)
90 end
91
92 document pge
93 Print the expression that is $ in C syntax.
94 Works only when an inferior is executing.
95 end
96
97 define pmz
98 set mpz_out_str(stderr, 10, $)
99 end
100
101 document pmz
102 Print the mpz value that is $
103 Works only when an inferior is executing.
104 end
105
106 define ptc
107 output (enum tree_code) $.common.code
108 echo \n
109 end
110
111 document ptc
112 Print the tree-code of the tree node that is $.
113 end
114
115 define pdn
116 output $.decl_minimal.name->identifier.id.str
117 echo \n
118 end
119
120 document pdn
121 Print the name of the decl-node that is $.
122 end
123
124 define ptn
125 output $.type.name->decl_minimal.name->identifier.id.str
126 echo \n
127 end
128
129 document ptn
130 Print the name of the type-node that is $.
131 end
132
133 define pvt
134 set debug_vec_tree ($)
135 end
136
137 document pvt
138 Print the VEC(tree) that is in $.
139 end
140
141 define pdd
142 set debug_dwarf_die ($)
143 end
144
145 document pdd
146 Print the dw_die_ref that is in $.
147 end
148
149 define prc
150 output (enum rtx_code) $.code
151 echo \ (
152 output $.mode
153 echo )\n
154 end
155
156 document prc
157 Print the rtx-code and machine mode of the rtx that is $.
158 end
159
160 define pi
161 print $.u.fld[0].rt_rtx@7
162 end
163
164 document pi
165 Print the fields of an instruction that is $.
166 end
167
168 define pbs
169 set print_binding_stack ()
170 end
171
172 document pbs
173 In cc1plus, print the current binding stack, frame by frame, up to and
174 including the global binding level.
175 end
176
177 define pbb
178 set debug ($)
179 end
180
181 document pbb
182 Dump the basic block that is in $, including rtx.
183 end
184
185 define pbm
186 set bitmap_print (stderr, $, "", "\n")
187 end
188
189 document pbm
190 Dump the bitmap that is in $ as a comma-separated list of numbers.
191 end
192
193 define pel
194 output expand_location ($)
195 echo \n
196 end
197
198 document pel
199 Print expanded location of $.
200 end
201
202 define pcfun
203 output debug_function (cfun ? cfun->decl : current_function_decl, 0)
204 echo \n
205 end
206
207 document pcfun
208 Print current function.
209 end
210
211 # Define some macros helpful to gdb when it is expanding macros.
212 macro define __FILE__ "gdb"
213 macro define __LINE__ 1
214 macro define __FUNCTION__ "gdb"
215 macro define __null 0
216 macro define input_line expand_location(input_location).line
217 macro define input_filename expand_location(input_location).file
218
219 # Gracefully handle aborts in functions used from gdb.
220 set unwindonsignal on
221
222 # Put breakpoints at exit and fancy_abort in case abort is mapped
223 # to either fprintf/exit or fancy_abort.
224 b fancy_abort
225
226 # Put a breakpoint on internal_error to help with debugging ICEs.
227 b internal_error
228
229 set complaints 0
230 # Don't let abort actually run, as it will make
231 # stdio stop working and therefore the `pr' command above as well.
232 # Put this last because gcc does not reference it any more unless
233 # USE_SYSTEM_ABORT is defined, so gdb may complain and bail out.
234 b exit
235 b abort
236
237 # Disable strict type checking. This allows developers to (for example)
238 # make inferior calls without casting absolute address to a suitable
239 # pointer type.
240 set check type off
241
242 # Skip all inline functions in tree.h.
243 # These are used in accessor macros.
244 # Note that this is added at the end because older gdb versions
245 # do not understand the 'skip' command.
246 # See https://sourceware.org/gdb/current/onlinedocs/gdb/Skipping-Over-Functions-and-Files.html
247 skip file tree.h
248
249 # Likewise, skip various inline functions in rtl.h.
250 skip rtx_expr_list::next
251 skip rtx_expr_list::element
252 skip rtx_insn_list::next
253 skip rtx_insn_list::insn
254 skip rtx_sequence::len
255 skip rtx_sequence::element
256 skip rtx_sequence::insn
257 skip INSN_UID
258 skip PREV_INSN
259 skip SET_PREV_INSN
260 skip NEXT_INSN
261 skip SET_NEXT_INSN
262 skip BLOCK_FOR_INSN
263 skip PATTERN
264 skip INSN_LOCATION
265 skip INSN_HAS_LOCATION
266 skip JUMP_LABEL_AS_INSN