|
|
1.1 root 1: define pr
2: set debug_rtx ($)
3: end
4:
5: document pr
6: Print the full structure of the rtx that is $.
7: Works only when an inferior is executing.
8: end
9:
10: define prl
11: set debug_rtx_list ($, debug_rtx_count)
12: end
13:
14: document prl
15: Print the full structure of all rtx insns beginning at $.
16: Works only when an inferior is executing.
17: Uses variable debug_rtx_count to control number of insns printed:
18: debug_rtx_count > 0: print from $ on.
19: debug_rtx_count < 0: print a window around $.
20:
21: There is also debug_rtx_find (rtx, uid) that will scan a list for UID and print
22: it using debug_rtx_list. Usage example: set $foo=debug_rtx_find(first, 42)
23: end
24:
25: define pt
26: set debug_tree ($)
27: end
28:
29: document pt
30: Print the full structure of the tree that is $.
31: Works only when an inferior is executing.
32: end
33:
34: define ptc
35: output (enum tree_code) $.common.code
36: echo \n
37: end
38:
39: document ptc
40: Print the tree-code of the tree node that is $.
41: end
42:
43: define pdn
44: output $.decl.name->identifier.pointer
45: echo \n
46: end
47:
48: document pdn
49: Print the name of the decl-node that is $.
50: end
51:
52: define ptn
53: output $.type.name->decl.name->identifier.pointer
54: echo \n
55: end
56:
57: document ptn
58: Print the name of the type-node that is $.
59: end
60:
61: define prc
62: output (enum rtx_code) $.code
63: echo \ (
64: output $.mode
65: echo )\n
66: end
67:
68: document prc
69: Print the rtx-code and machine mode of the rtx that is $.
70: end
71:
72: define pi
73: print $.fld[0].rtx@7
74: end
75:
76: document pi
77: Print the fields of an instruction that is $.
78: end
79:
80: define pbs
81: set print_binding_stack ()
82: end
83:
84: document pbs
85: In cc1plus, print the current binding stack, frame by frame, up to and
86: including the global binding level.
87: end
88:
89: # Don't let abort actually run, as it will make
90: # stdio stop working and therefore the `pr' command below as well.
91: b abort
92:
93: # Make gdb complain about symbol reading errors. This is so that gcc
94: # developers can see and fix bugs in gcc debug output.
95: set complaints 20
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.