[project @ 1996-07-25 20:43:49 by partain]
[ghc-hetmet.git] / ghc / .gdbinit
1 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime
2 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/storage
3 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/c-as-asm
4 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/io
5 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/main
6 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/prims
7 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/profiling
8 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/runtime/gmp
9 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib
10 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/MainIO
11 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/PreludeErrIO
12 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/PreludeGlaST
13 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/PreludePrimIO
14 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/Stdio
15 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/PreludeDialogueIO
16 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/glaExts/ByteOps
17 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/Builtin
18 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/Core
19 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IO
20 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/PS
21 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/List
22 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/Prel
23 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/Text
24 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TysBasic
25 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/Cls
26 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IArray
27 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IBool
28 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IChar
29 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IComplex
30 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IDouble
31 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IFloat
32 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IInt
33 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IInteger
34 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IList
35 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/IRatio
36 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/ITup0
37 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/ITup2
38 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/ITup3
39 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/ITup4
40 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/ITup5
41 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TyArray
42 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TyBool
43 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TyComplex
44 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TyIO
45 directory /local/grasp_tmp3/partain/ghc-BUILDS/working/ghc/lib/prelude/TyRatio
46
47 define pR1
48 print (sfp) (((STGRegisterTable)MainRegTable).rR1)
49 end
50 define pR2
51 print (sfp) (((STGRegisterTable)MainRegTable).rR2)
52 end
53 define pR3
54 print (sfp) (((STGRegisterTable)MainRegTable).rR3)
55 end
56 define pR4
57 print (sfp) (((STGRegisterTable)MainRegTable).rR4)
58 end
59 define pR5
60 print (sfp) (((STGRegisterTable)MainRegTable).rR5)
61 end
62 define pR6
63 print (sfp) (((STGRegisterTable)MainRegTable).rR6)
64 end
65 define pR7
66 print (sfp) (((STGRegisterTable)MainRegTable).rR7)
67 end
68 define pR8
69 print (sfp) (((STGRegisterTable)MainRegTable).rR8)
70 end
71 define pFlt1
72 print (StgFloat) (((STGRegisterTable)MainRegTable).rFlt1)
73 end
74 define pDbl1
75 print (StgDouble) (((STGRegisterTable)MainRegTable).rDbl1)
76 end
77
78 define pSpA
79 print (sfp) (((STGRegisterTable)MainRegTable).rSpA)
80 end
81 define pSuA
82 print (sfp) (((STGRegisterTable)MainRegTable).rSuA)
83 end
84 define pSpB
85 print (sfp) (((STGRegisterTable)MainRegTable).rSpB)
86 end
87 define pSuB
88 print (sfp) (((STGRegisterTable)MainRegTable).rSuB)
89 end
90
91 define pHp
92 print (sfp) (((STGRegisterTable)MainRegTable).rHp)
93 end
94
95 define pHpLim
96 print (sfp) (((STGRegisterTable)MainRegTable) .rHpLim)
97 end
98
99 define pn
100 call DEBUG_PRINT_NODE(Ret1)
101 end
102
103 define pt
104 call DEBUG_TREE(Ret1)
105 end
106
107 define pit
108 call DEBUG_INFO_TABLE(Ret1)
109 end
110
111 define pr
112 call DEBUG_REGS()
113 end
114
115 define pas
116 call DEBUG_ASTACK(32767)
117 end
118
119 define pbs
120 call DEBUG_BSTACK(32767)
121 end
122
123 define pus
124 call DEBUG_UPDATES(32767)
125 end