From e1cd7712df07d22dc4babb87faef916366a1dbbe Mon Sep 17 00:00:00 2001
From: Pekka Pirinen <pekka@harlequin.com>
Date: Tue, 24 Apr 2001 16:07:36 +0100
Subject: [PATCH] Suppress vc6 warnings

Copied from Perforce
 Change: 21829
 ServerID: perforce.ravenbrook.com
---
 mps/src/poollo.c | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/mps/src/poollo.c b/mps/src/poollo.c
index 7674d09c3e7..cbd04f19fd2 100644
--- a/mps/src/poollo.c
+++ b/mps/src/poollo.c
@@ -1,6 +1,6 @@
 /* impl.c.poollo: LEAF POOL CLASS
  *
- * $HopeName: MMsrc!poollo.c(trunk.18) $
+ * $HopeName: MMsrc!poollo.c(trunk.19) $
  * Copyright (C) 2001 Harlequin Limited.  All rights reserved.
  *
  * DESIGN
@@ -12,7 +12,7 @@
 #include "mpm.h"
 #include "mps.h"
 
-SRCID(poollo, "$HopeName: MMsrc!poollo.c(trunk.18) $");
+SRCID(poollo, "$HopeName: MMsrc!poollo.c(trunk.19) $");
 
 
 #define LOGen ((Serial)1)
@@ -33,7 +33,7 @@ typedef struct LOStruct {
   Sig sig;
 } LOStruct;
 
-#define PoolPoolLO(pool)        PARENT(LOStruct, poolStruct, pool)
+#define PoolPoolLO(pool) PARENT(LOStruct, poolStruct, pool)
 #define LOPool(lo) (&(lo)->poolStruct)
 
 
@@ -518,6 +518,7 @@ static void LOFinish(Pool pool)
     LOSeg loseg = SegLOSeg(seg);
 
     AVERT(LOSeg, loseg);
+    UNUSED(loseg); /* impl.c.mpm.check.unused */
     SegFree(seg);
   }
   PoolGenFinish(&lo->pgen);