aboutsummaryrefslogtreecommitdiffstats
path: root/mps/code
diff options
context:
space:
mode:
authorRichard Brooksby2012-08-22 08:39:07 +0100
committerRichard Brooksby2012-08-22 08:39:07 +0100
commit5e96e53da6e45131a427e7a395b5e6cb9daec8cd (patch)
tree607ca4daa0114c95eb05cd0ffe7648e1a49d64e7 /mps/code
parentf6d71a6ee99e168ae50119291d0044cbbc78d22f (diff)
downloademacs-5e96e53da6e45131a427e7a395b5e6cb9daec8cd.tar.gz
emacs-5e96e53da6e45131a427e7a395b5e6cb9daec8cd.zip
Tidying up table and making maximum event name length obvious.
Copied from Perforce Change: 179014 ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code')
-rw-r--r--mps/code/eventdef.h189
1 files changed, 94 insertions, 95 deletions
diff --git a/mps/code/eventdef.h b/mps/code/eventdef.h
index 266f6550dad..379abd28751 100644
--- a/mps/code/eventdef.h
+++ b/mps/code/eventdef.h
@@ -5,9 +5,8 @@
5 * 5 *
6 * .source: <design/telemetry/> 6 * .source: <design/telemetry/>
7 * 7 *
8 * .desc: This file declares relationships that define the various 8 * .desc: This file declares macros that define the types of events and their
9 * event types. It is intended to be used with clever definitions 9 * properties.
10 * of the RELATION macro.
11 * 10 *
12 * TRANSGRESSIONS 11 * TRANSGRESSIONS
13 * 12 *
@@ -42,8 +41,7 @@
42 * 41 *
43 * These specify: 42 * These specify:
44 * - Type: The name of the event type, without the leading "Event"; 43 * - Type: The name of the event type, without the leading "Event";
45 * - Code: The unique 16-bit code associated with this event type, 44 * - Code: The unique 16-bit code associated with this event type;
46 * not currently used (see <code/eventcom.h>);
47 * - Always: Whether this event type should appear in optimised 45 * - Always: Whether this event type should appear in optimised
48 * varieties, not currently used; 46 * varieties, not currently used;
49 * - Kind: Category into which this event falls, without the 47 * - Kind: Category into which this event falls, without the
@@ -57,103 +55,104 @@
57/* FIXME: Work out why not-in-use events were not in use and restore or delete them. */ 55/* FIXME: Work out why not-in-use events were not in use and restore or delete them. */
58 56
59#define EVENT_LIST(EVENT, X) \ 57#define EVENT_LIST(EVENT, X) \
60 EVENT(X, AMCGenCreate , 0x0001, TRUE, Pool, 2, (P,P)) \ 58 /* 0123456789012345678 <- don't exceed without changing EventNameMAX */ \
61 EVENT(X, AMCGenDestroy , 0x0002, TRUE, Pool, 1, (P)) \ 59 EVENT(X, AMCGenCreate , 0x0001, TRUE, Pool, 2, (P,P)) \
62 EVENT(X, AMCInit , 0x0003, TRUE, Pool, 2, (P,P)) \ 60 EVENT(X, AMCGenDestroy , 0x0002, TRUE, Pool, 1, (P)) \
63 EVENT(X, AMCFinish , 0x0004, TRUE, Pool, 1, (P)) \ 61 EVENT(X, AMCInit , 0x0003, TRUE, Pool, 2, (P,P)) \
64 EVENT(X, ArenaCreateVM , 0x0005, TRUE, Arena, 3, (P,W,W)) \ 62 EVENT(X, AMCFinish , 0x0004, TRUE, Pool, 1, (P)) \
65 EVENT(X, ArenaCreateVMNZ , 0x0006, TRUE, Arena, 3, (P,W,W)) \ 63 EVENT(X, ArenaCreateVM , 0x0005, TRUE, Arena, 3, (P,W,W)) \
66 EVENT(X, ArenaWriteFaults , 0x0007, TRUE, Trace, 2, (P,W)) \ 64 EVENT(X, ArenaCreateVMNZ , 0x0006, TRUE, Arena, 3, (P,W,W)) \
67 EVENT(X, MeterInit , 0x0008, TRUE, Pool, 2, (P,P)) \ 65 EVENT(X, ArenaWriteFaults , 0x0007, TRUE, Trace, 2, (P,W)) \
68 EVENT(X, MeterValues , 0x0009, TRUE, Pool, 6, (P,D,D,W,W,W)) \ 66 EVENT(X, MeterInit , 0x0008, TRUE, Pool, 2, (P,P)) \
69 EVENT(X, AMCScanBegin , 0x000a, TRUE, Seg, 3, (P,P,P)) \ 67 EVENT(X, MeterValues , 0x0009, TRUE, Pool, 6, (P,D,D,W,W,W)) \
70 EVENT(X, AMCScanEnd , 0x000b, TRUE, Seg, 3, (P,P,P)) \ 68 EVENT(X, AMCScanBegin , 0x000a, TRUE, Seg, 3, (P,P,P)) \
71 EVENT(X, AMCFix , 0x000c, TRUE, Ref, 0, ()) \ 69 EVENT(X, AMCScanEnd , 0x000b, TRUE, Seg, 3, (P,P,P)) \
72 EVENT(X, AMCFixInPlace , 0x000d, TRUE, Ref, 0, ()) \ 70 EVENT(X, AMCFix , 0x000c, TRUE, Ref, 0, ()) \
73 EVENT(X, AMCFixForward , 0x000e, TRUE, Ref, 1, (A)) \ 71 EVENT(X, AMCFixInPlace , 0x000d, TRUE, Ref, 0, ()) \
74 EVENT(X, AMCReclaim , 0x000f, TRUE, Seg, 3, (P,P,P)) \ 72 EVENT(X, AMCFixForward , 0x000e, TRUE, Ref, 1, (A)) \
75 /* EVENT(X, AMCTraceEnd , 0x0010, TRUE, Trace, 3, (P,P,P)) */ \ 73 EVENT(X, AMCReclaim , 0x000f, TRUE, Seg, 3, (P,P,P)) \
76 EVENT(X, ArenaCreateCL , 0x0011, TRUE, Arena, 3, (P,W,A)) \ 74 /* EVENT(X, AMCTraceEnd , 0x0010, TRUE, Trace, 3, (P,P,P)) */ \
77 EVENT(X, ArenaDestroy , 0x0012, TRUE, Arena, 1, (P)) \ 75 EVENT(X, ArenaCreateCL , 0x0011, TRUE, Arena, 3, (P,W,A)) \
78 EVENT(X, SegAlloc , 0x0013, TRUE, Seg, 5, (P,P,A,W,P)) \ 76 EVENT(X, ArenaDestroy , 0x0012, TRUE, Arena, 1, (P)) \
79 EVENT(X, SegFree , 0x0014, TRUE, Seg, 2, (P,P)) \ 77 EVENT(X, SegAlloc , 0x0013, TRUE, Seg, 5, (P,P,A,W,P)) \
80 EVENT(X, PoolInit , 0x0015, TRUE, Pool, 3, (P,P,P)) \ 78 EVENT(X, SegFree , 0x0014, TRUE, Seg, 2, (P,P)) \
81 EVENT(X, PoolFinish , 0x0016, TRUE, Pool, 1, (P)) \ 79 EVENT(X, PoolInit , 0x0015, TRUE, Pool, 3, (P,P,P)) \
82 EVENT(X, PoolAlloc , 0x0017, TRUE, Object, 3, (P,A,W)) \ 80 EVENT(X, PoolFinish , 0x0016, TRUE, Pool, 1, (P)) \
83 EVENT(X, PoolFree , 0x0018, TRUE, Object, 3, (P,A,W)) \ 81 EVENT(X, PoolAlloc , 0x0017, TRUE, Object, 3, (P,A,W)) \
84 EVENT(X, CBSInit , 0x0019, TRUE, Pool, 2, (P,P)) \ 82 EVENT(X, PoolFree , 0x0018, TRUE, Object, 3, (P,A,W)) \
85 EVENT(X, Intern , 0x001a, TRUE, User, 2, (W,S)) \ 83 EVENT(X, CBSInit , 0x0019, TRUE, Pool, 2, (P,P)) \
86 EVENT(X, Label , 0x001b, TRUE, User, 2, (A,W)) \ 84 EVENT(X, Intern , 0x001a, TRUE, User, 2, (W,S)) \
87 EVENT(X, TraceStart , 0x001c, TRUE, Trace, 3, (P,P,P)) \ 85 EVENT(X, Label , 0x001b, TRUE, User, 2, (A,W)) \
88 EVENT(X, TraceCreate , 0x001d, TRUE, Trace, 4, (P,P,P,U)) \ 86 EVENT(X, TraceStart , 0x001c, TRUE, Trace, 3, (P,P,P)) \
89 EVENT(X, TraceDestroy , 0x001e, TRUE, Trace, 1, (P)) \ 87 EVENT(X, TraceCreate , 0x001d, TRUE, Trace, 4, (P,P,P,U)) \
90 EVENT(X, SegSetGrey , 0x001f, TRUE, Seg, 3, (P,P,U)) \ 88 EVENT(X, TraceDestroy , 0x001e, TRUE, Trace, 1, (P)) \
91 EVENT(X, TraceFlipBegin , 0x0020, TRUE, Trace, 2, (P,P)) \ 89 EVENT(X, SegSetGrey , 0x001f, TRUE, Seg, 3, (P,P,U)) \
92 EVENT(X, TraceFlipEnd , 0x0021, TRUE, Trace, 2, (P,P)) \ 90 EVENT(X, TraceFlipBegin , 0x0020, TRUE, Trace, 2, (P,P)) \
93 EVENT(X, TraceReclaim , 0x0022, TRUE, Seg, 1, (P)) \ 91 EVENT(X, TraceFlipEnd , 0x0021, TRUE, Trace, 2, (P,P)) \
94 /* EVENT(X, TraceScan , 0x0023, TRUE, Seg, 5, (U,U,P,P,P)) */ \ 92 EVENT(X, TraceReclaim , 0x0022, TRUE, Seg, 1, (P)) \
95 EVENT(X, TraceAccess , 0x0024, TRUE, Seg, 3, (P,P,U)) \ 93 /* EVENT(X, TraceScan , 0x0023, TRUE, Seg, 5, (U,U,P,P,P)) */ \
94 EVENT(X, TraceAccess , 0x0024, TRUE, Seg, 3, (P,P,U)) \
96 /* TracePoll's kind isn't really Trace, but then it isn't Seg either */ \ 95 /* TracePoll's kind isn't really Trace, but then it isn't Seg either */ \
97 EVENT(X, TracePoll , 0x0025, TRUE, Trace, 2, (P,P)) \ 96 EVENT(X, TracePoll , 0x0025, TRUE, Trace, 2, (P,P)) \
98 EVENT(X, TraceFix , 0x0026, TRUE, Ref, 4, (P,P,A,U)) \ 97 EVENT(X, TraceFix , 0x0026, TRUE, Ref, 4, (P,P,A,U)) \
99 EVENT(X, TraceFixSeg , 0x0027, TRUE, Ref, 1, (P)) \ 98 EVENT(X, TraceFixSeg , 0x0027, TRUE, Ref, 1, (P)) \
100 EVENT(X, TraceFixWhite , 0x0028, TRUE, Ref, 0, ()) \ 99 EVENT(X, TraceFixWhite , 0x0028, TRUE, Ref, 0, ()) \
101 /* TraceScanArea{Tagged} abuses kind, see .kind.abuse */ \ 100 /* TraceScanArea{Tagged} abuses kind, see .kind.abuse */ \
102 EVENT(X, TraceScanArea , 0x0029, TRUE, Seg, 3, (P,P,P)) \ 101 EVENT(X, TraceScanArea , 0x0029, TRUE, Seg, 3, (P,P,P)) \
103 EVENT(X, TraceScanAreaTagged , 0x002a, TRUE, Seg, 3, (P,P,P)) \ 102 EVENT(X, TraceScanAreaTagged, 0x002a, TRUE, Seg, 3, (P,P,P)) \
104 EVENT(X, VMCreate , 0x002b, TRUE, Arena, 3, (P,A,A)) \ 103 EVENT(X, VMCreate , 0x002b, TRUE, Arena, 3, (P,A,A)) \
105 EVENT(X, VMDestroy , 0x002c, TRUE, Arena, 1, (P)) \ 104 EVENT(X, VMDestroy , 0x002c, TRUE, Arena, 1, (P)) \
106 EVENT(X, VMMap , 0x002d, TRUE, Seg, 3, (P,A,A)) \ 105 EVENT(X, VMMap , 0x002d, TRUE, Seg, 3, (P,A,A)) \
107 EVENT(X, VMUnmap , 0x002e, TRUE, Seg, 3, (P,A,A)) \ 106 EVENT(X, VMUnmap , 0x002e, TRUE, Seg, 3, (P,A,A)) \
108 EVENT(X, ArenaExtend , 0x002f, TRUE, Arena, 3, (P,A,W)) \ 107 EVENT(X, ArenaExtend , 0x002f, TRUE, Arena, 3, (P,A,W)) \
109 EVENT(X, ArenaRetract , 0x0030, TRUE, Arena, 3, (P,A,W)) \ 108 EVENT(X, ArenaRetract , 0x0030, TRUE, Arena, 3, (P,A,W)) \
110 EVENT(X, TraceSegGreyen , 0x0031, TRUE, Seg, 3, (P,P,U)) \ 109 EVENT(X, TraceSegGreyen , 0x0031, TRUE, Seg, 3, (P,P,U)) \
111 /* RootScanned abuses kind, see .kind.abuse */ \ 110 /* RootScanned abuses kind, see .kind.abuse */ \
112 EVENT(X, RootScan , 0x0032, TRUE, Seg, 3, (P,W,W)) \ 111 EVENT(X, RootScan , 0x0032, TRUE, Seg, 3, (P,W,W)) \
113 /* TraceStep abuses kind, see .kind.abuse */ \ 112 /* TraceStep abuses kind, see .kind.abuse */ \
114 EVENT(X, TraceStep , 0x0033, TRUE, Seg, 2, (P,P)) \ 113 EVENT(X, TraceStep , 0x0033, TRUE, Seg, 2, (P,P)) \
115 EVENT(X, BufferReserve , 0x0034, TRUE, Object, 3, (P,A,W)) \ 114 EVENT(X, BufferReserve , 0x0034, TRUE, Object, 3, (P,A,W)) \
116 EVENT(X, BufferCommit , 0x0035, TRUE, Object, 4, (P,A,W,A)) \ 115 EVENT(X, BufferCommit , 0x0035, TRUE, Object, 4, (P,A,W,A)) \
117 /* BufferInit/Finish abuse kind, see .kind.abuse */ \ 116 /* BufferInit/Finish abuse kind, see .kind.abuse */ \
118 EVENT(X, BufferInit , 0x0036, TRUE, Pool, 3, (P,P,U)) \ 117 EVENT(X, BufferInit , 0x0036, TRUE, Pool, 3, (P,P,U)) \
119 EVENT(X, BufferFinish , 0x0037, TRUE, Pool, 1, (P)) \ 118 EVENT(X, BufferFinish , 0x0037, TRUE, Pool, 1, (P)) \
120 /* EVENT(X, MVTFinish , 0x0038, TRUE, Pool, 1, (P)) */ \ 119 /* EVENT(X, MVTFinish , 0x0038, TRUE, Pool, 1, (P)) */ \
121 EVENT(X, BufferFill , 0x0039, TRUE, Seg, 4, (P,W,A,W)) \ 120 EVENT(X, BufferFill , 0x0039, TRUE, Seg, 4, (P,W,A,W)) \
122 EVENT(X, BufferEmpty , 0x003A, TRUE, Seg, 2, (P,W)) \ 121 EVENT(X, BufferEmpty , 0x003A, TRUE, Seg, 2, (P,W)) \
123 EVENT(X, SegAllocFail , 0x003B, TRUE, Seg, 3, (P,W,P)) \ 122 EVENT(X, SegAllocFail , 0x003B, TRUE, Seg, 3, (P,W,P)) \
124 EVENT(X, TraceScanSeg , 0x003C, TRUE, Seg, 4, (U,U,P,P)) \ 123 EVENT(X, TraceScanSeg , 0x003C, TRUE, Seg, 4, (U,U,P,P)) \
125 /* TraceScanSingleRef abuses kind, see .kind.abuse */ \ 124 /* TraceScanSingleRef abuses kind, see .kind.abuse */ \
126 EVENT(X, TraceScanSingleRef , 0x003D, TRUE, Seg, 4, (U,U,P,A)) \ 125 EVENT(X, TraceScanSingleRef , 0x003D, TRUE, Seg, 4, (U,U,P,A)) \
127 EVENT(X, TraceStatCondemn , 0x003E, TRUE, Trace, 7, (P,W,W,W,W,D,D)) \ 126 EVENT(X, TraceStatCondemn , 0x003E, TRUE, Trace, 7, (P,W,W,W,W,D,D)) \
128 EVENT(X, TraceStatScan , 0x003F, TRUE, Trace, 13, (P,W,W,W,W,W,W,W,W,W,W,W,W)) \ 127 EVENT(X, TraceStatScan , 0x003F, TRUE, Trace, 13, (P,W,W,W,W,W,W,W,W,W,W,W,W)) \
129 EVENT(X, TraceStatFix , 0x0040, TRUE, Trace, 10, (P,W,W,W,W,W,W,W,W,W)) \ 128 EVENT(X, TraceStatFix , 0x0040, TRUE, Trace, 10, (P,W,W,W,W,W,W,W,W,W)) \
130 EVENT(X, TraceStatReclaim , 0x0041, TRUE, Trace, 3, (P,W,W)) \ 129 EVENT(X, TraceStatReclaim , 0x0041, TRUE, Trace, 3, (P,W,W)) \
131 EVENT(X, PoolInitMVFF , 0x0042, TRUE, Pool, 8, (P,P,W,W,W,U,U,U)) \ 130 EVENT(X, PoolInitMVFF , 0x0042, TRUE, Pool, 8, (P,P,W,W,W,U,U,U)) \
132 EVENT(X, PoolInitMV , 0x0043, TRUE, Pool, 5, (P,P,W,W,W)) \ 131 EVENT(X, PoolInitMV , 0x0043, TRUE, Pool, 5, (P,P,W,W,W)) \
133 EVENT(X, PoolInitMFS , 0x0044, TRUE, Pool, 4, (P,P,W,W)) \ 132 EVENT(X, PoolInitMFS , 0x0044, TRUE, Pool, 4, (P,P,W,W)) \
134 EVENT(X, PoolInitEPVM , 0x0045, TRUE, Pool, 5, (P,P,P,U,U)) \ 133 EVENT(X, PoolInitEPVM , 0x0045, TRUE, Pool, 5, (P,P,P,U,U)) \
135 EVENT(X, PoolInitEPDL , 0x0046, TRUE, Pool, 6, (P,P,U,W,W,W)) \ 134 EVENT(X, PoolInitEPDL , 0x0046, TRUE, Pool, 6, (P,P,U,W,W,W)) \
136 EVENT(X, PoolInitAMS , 0x0047, TRUE, Pool, 3, (P,P,P)) \ 135 EVENT(X, PoolInitAMS , 0x0047, TRUE, Pool, 3, (P,P,P)) \
137 EVENT(X, PoolInitAMC , 0x0048, TRUE, Pool, 2, (P,P)) \ 136 EVENT(X, PoolInitAMC , 0x0048, TRUE, Pool, 2, (P,P)) \
138 EVENT(X, PoolInitAMCZ , 0x0049, TRUE, Pool, 2, (P,P)) \ 137 EVENT(X, PoolInitAMCZ , 0x0049, TRUE, Pool, 2, (P,P)) \
139 EVENT(X, PoolInitAWL , 0x004A, TRUE, Pool, 2, (P,P)) \ 138 EVENT(X, PoolInitAWL , 0x004A, TRUE, Pool, 2, (P,P)) \
140 EVENT(X, PoolInitLO , 0x004B, TRUE, Pool, 2, (P,P)) \ 139 EVENT(X, PoolInitLO , 0x004B, TRUE, Pool, 2, (P,P)) \
141 EVENT(X, PoolInitSNC , 0x004C, TRUE, Pool, 2, (P,P)) \ 140 EVENT(X, PoolInitSNC , 0x004C, TRUE, Pool, 2, (P,P)) \
142 EVENT(X, PoolInitMVT , 0x004D, TRUE, Pool, 6, (P,W,W,W,W,W)) \ 141 EVENT(X, PoolInitMVT , 0x004D, TRUE, Pool, 6, (P,W,W,W,W,W)) \
143 EVENT(X, BufferInitEPVM , 0x0050, TRUE, Pool, 3, (P,P,U)) \ 142 EVENT(X, BufferInitEPVM , 0x0050, TRUE, Pool, 3, (P,P,U)) \
144 EVENT(X, BufferInitSeg , 0x0051, TRUE, Pool, 3, (P,P,U)) \ 143 EVENT(X, BufferInitSeg , 0x0051, TRUE, Pool, 3, (P,P,U)) \
145 EVENT(X, BufferInitRank , 0x0052, TRUE, Pool, 4, (P,P,U,U)) \ 144 EVENT(X, BufferInitRank , 0x0052, TRUE, Pool, 4, (P,P,U,U)) \
146 /* PoolPush/Pop go under Object, because they're user ops. */ \ 145 /* PoolPush/Pop go under Object, because they're user ops. */ \
147 EVENT(X, PoolPush , 0x0060, TRUE, Object, 1, (P)) \ 146 EVENT(X, PoolPush , 0x0060, TRUE, Object, 1, (P)) \
148 EVENT(X, PoolPop , 0x0061, TRUE, Object, 2, (P,U)) \ 147 EVENT(X, PoolPop , 0x0061, TRUE, Object, 2, (P,U)) \
149 EVENT(X, ReservoirLimitSet , 0x0062, TRUE, Arena, 2, (P,W)) \ 148 EVENT(X, ReservoirLimitSet , 0x0062, TRUE, Arena, 2, (P,W)) \
150 EVENT(X, CommitLimitSet , 0x0063, TRUE, Arena, 3, (P,W,U)) \ 149 EVENT(X, CommitLimitSet , 0x0063, TRUE, Arena, 3, (P,W,U)) \
151 EVENT(X, SpareCommitLimitSet , 0x0064, TRUE, Arena, 2, (P,W)) \ 150 EVENT(X, SpareCommitLimitSet, 0x0064, TRUE, Arena, 2, (P,W)) \
152 EVENT(X, ArenaAlloc , 0x0065, TRUE, Arena, 5, (P,P,A,W,P)) \ 151 EVENT(X, ArenaAlloc , 0x0065, TRUE, Arena, 5, (P,P,A,W,P)) \
153 EVENT(X, ArenaFree , 0x0066, TRUE, Arena, 3, (P,A,W)) \ 152 EVENT(X, ArenaFree , 0x0066, TRUE, Arena, 3, (P,A,W)) \
154 EVENT(X, ArenaAllocFail , 0x0067, TRUE, Arena, 3, (P,W,P)) \ 153 EVENT(X, ArenaAllocFail , 0x0067, TRUE, Arena, 3, (P,W,P)) \
155 EVENT(X, SegMerge , 0x0068, TRUE, Seg, 3, (P,P,P)) \ 154 EVENT(X, SegMerge , 0x0068, TRUE, Seg, 3, (P,P,P)) \
156 EVENT(X, SegSplit , 0x0069, TRUE, Seg, 4, (P,P,P,A)) 155 EVENT(X, SegSplit , 0x0069, TRUE, Seg, 4, (P,P,P,A))
157 156
158/* Remember to update EventNameMAX and EventCodeMAX in eventcom.h! */ 157/* Remember to update EventNameMAX and EventCodeMAX in eventcom.h! */
159 158