Start development on 386BSD 0.1
[unix-history] / .ref-386BSD-0.0 / usr / src / usr.bin / gcc / cc1 / .gdbinit
CommitLineData
1a066fca
WJ
1define pr
2set debug_rtx ($)
3end
4
5document pr
6Print the full structure of the rtx that is $.
7Works only when an inferior is executing.
8end
9
10define pt
11set debug_tree ($)
12end
13
14document pt
15Print the full structure of the tree that is $.
16Works only when an inferior is executing.
17end
18
19define ptc
20output (enum tree_code) $.common.code
21echo \n
22end
23
24document ptc
25Print the tree-code of the tree node that is $.
26end
27
28define pdn
29output $.decl.name->identifier.pointer
30echo \n
31end
32
33document pdn
34Print the name of the decl-node that is $.
35end
36
37define prc
38output (enum rtx_code) $.code
39echo \ (
40output $.mode
41echo )\n
42end
43
44document prc
45Print the rtx-code and machine mode of the rtx that is $.
46end
47
48define pi
49print $.fld[0].rtx@7
50end
51
52document pi
53Print the fields of an instruction that is $.
54end
55
56# Don't let abort actually run, as it will make
57# stdio stop working and therefore the `pr' command below as well.
58b abort