aboutsummaryrefslogtreecommitdiffstats
path: root/mps/code/poolabs.c
diff options
context:
space:
mode:
authorNick Barnes2001-12-17 15:18:17 +0000
committerNick Barnes2001-12-17 15:18:17 +0000
commitdb4b3a6fa51ea452f62ed64612da5466d7bc292e (patch)
tree4401c0c97d4df2e1c48ad06f263c27199e92d5dc /mps/code/poolabs.c
parentc864931fe4271b6592ca4a76ce856938d263c74a (diff)
downloademacs-db4b3a6fa51ea452f62ed64612da5466d7bc292e.tar.gz
emacs-db4b3a6fa51ea452f62ed64612da5466d7bc292e.zip
Remove trailing whitespace.
Copied from Perforce Change: 25309 ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code/poolabs.c')
-rw-r--r--mps/code/poolabs.c24
1 files changed, 12 insertions, 12 deletions
diff --git a/mps/code/poolabs.c b/mps/code/poolabs.c
index f7a10130c15..86fd76ddf31 100644
--- a/mps/code/poolabs.c
+++ b/mps/code/poolabs.c
@@ -6,22 +6,22 @@
6 * PURPOSE 6 * PURPOSE
7 * 7 *
8 * .purpose: This defines the abstract pool classes, giving 8 * .purpose: This defines the abstract pool classes, giving
9 * a single-inheritance framework which concrete classes 9 * a single-inheritance framework which concrete classes
10 * may utilize. The purpose is to reduce the fragility of class 10 * may utilize. The purpose is to reduce the fragility of class
11 * definitions for pool implementations when small changes are 11 * definitions for pool implementations when small changes are
12 * made to the pool protocol. For now, the class hierarchy for 12 * made to the pool protocol. For now, the class hierarchy for
13 * the abstract classes is intended to be useful, but not to 13 * the abstract classes is intended to be useful, but not to
14 * represent any particular design for pool inheritance. 14 * represent any particular design for pool inheritance.
15 * 15 *
16 * HIERARCHY 16 * HIERARCHY
17 * 17 *
18 * .hierarchy: define the following hierarchy of abstract pool classes: 18 * .hierarchy: define the following hierarchy of abstract pool classes:
19 * AbstractPoolClass - implements init, finish, describe 19 * AbstractPoolClass - implements init, finish, describe
20 * AbstractAllocFreePoolClass - implements alloc & free 20 * AbstractAllocFreePoolClass - implements alloc & free
21 * AbstractBufferPoolClass - implements the buffer protocol 21 * AbstractBufferPoolClass - implements the buffer protocol
22 * AbstractSegBufPoolClass - uses SegBuf buffer class 22 * AbstractSegBufPoolClass - uses SegBuf buffer class
23 * AbstractScanPoolClass - implements basic scanning 23 * AbstractScanPoolClass - implements basic scanning
24 * AbstractCollectPoolClass - implements basic GC 24 * AbstractCollectPoolClass - implements basic GC
25 */ 25 */
26 26
27#include "mpm.h" 27#include "mpm.h"
@@ -39,8 +39,8 @@ typedef PoolClassStruct AbstractCollectPoolClassStruct;
39 39
40/* Mixins: 40/* Mixins:
41 * 41 *
42 * For now (at least) we're avoiding multiple inheritance. 42 * For now (at least) we're avoiding multiple inheritance.
43 * However, there is a significant use of multiple inheritance 43 * However, there is a significant use of multiple inheritance
44 * in practice amongst the pool classes, as there are several 44 * in practice amongst the pool classes, as there are several
45 * orthogonal sub-protocols included in the pool protocol. 45 * orthogonal sub-protocols included in the pool protocol.
46 * The following mixin functions help to provide the inheritance 46 * The following mixin functions help to provide the inheritance
@@ -68,7 +68,7 @@ void PoolClassMixInBuffer(PoolClass class)
68 class->bufferFill = PoolTrivBufferFill; 68 class->bufferFill = PoolTrivBufferFill;
69 class->bufferEmpty = PoolTrivBufferEmpty; 69 class->bufferEmpty = PoolTrivBufferEmpty;
70 /* By default, buffered pools treat frame operations as NOOPs */ 70 /* By default, buffered pools treat frame operations as NOOPs */
71 class->framePush = PoolTrivFramePush; 71 class->framePush = PoolTrivFramePush;
72 class->framePop = PoolTrivFramePop; 72 class->framePop = PoolTrivFramePop;
73 class->bufferClass = BufferClassGet; 73 class->bufferClass = BufferClassGet;
74} 74}
@@ -179,7 +179,7 @@ DEFINE_CLASS(AbstractCollectPoolClass, class)
179} 179}
180 180
181 181
182/* PoolNo*, PoolTriv* -- Trivial and non-methods for Pool Classes 182/* PoolNo*, PoolTriv* -- Trivial and non-methods for Pool Classes
183 * 183 *
184 * See design.mps.pool.no and design.mps.pool.triv 184 * See design.mps.pool.no and design.mps.pool.triv
185 */ 185 */
@@ -266,14 +266,14 @@ Res PoolTrivBufferFill(Addr *baseReturn, Addr *limitReturn,
266 266
267 res = PoolAlloc(&p, pool, size, withReservoirPermit); 267 res = PoolAlloc(&p, pool, size, withReservoirPermit);
268 if(res != ResOK) return res; 268 if(res != ResOK) return res;
269 269
270 *baseReturn = p; 270 *baseReturn = p;
271 *limitReturn = AddrAdd(p, size); 271 *limitReturn = AddrAdd(p, size);
272 return ResOK; 272 return ResOK;
273} 273}
274 274
275 275
276void PoolNoBufferEmpty(Pool pool, Buffer buffer, 276void PoolNoBufferEmpty(Pool pool, Buffer buffer,
277 Addr init, Addr limit) 277 Addr init, Addr limit)
278{ 278{
279 AVERT(Pool, pool); 279 AVERT(Pool, pool);