From cb8f0ea514ac0b2317c2fc2b76e365895184e1a0 Mon Sep 17 00:00:00 2001
From: Richard Brooksby
Date: Tue, 25 Sep 2012 23:34:20 +0100
Subject: Removing unnecessary unused declarations since changelist 179690.

Copied from Perforce
 Change: 179691
 ServerID: perforce.ravenbrook.com

---
 mps/code/buffer.c  | 4 ----
 mps/code/cbs.c     | 1 -
 mps/code/poolamc.c | 2 --
 mps/code/seg.c     | 2 --
 4 files changed, 9 deletions(-)

(limited to 'mps/code')

diff --git a/mps/code/buffer.c b/mps/code/buffer.c
index b33c08dc239..2128ffda0cf 100644
--- a/mps/code/buffer.c
+++ b/mps/code/buffer.c
@@ -874,10 +874,6 @@ Bool BufferTrip(Buffer buffer, Addr p, Size size)
       clientClass = (Addr)0;
     }
     EVENT4(BufferCommit, buffer, p, size, clientClass);
-    /* Of course, it's not _really_ unused unless you're not */
-    /* using telemetry.  This is a HACK @@@@.  It should be */
-    /* removed when telemetry is fixed to use its arguments. */
-    UNUSED(clientClass);
   }
   return TRUE;
 }
diff --git a/mps/code/cbs.c b/mps/code/cbs.c
index d5958990c08..a9cb0d0b087 100644
--- a/mps/code/cbs.c
+++ b/mps/code/cbs.c
@@ -314,7 +314,6 @@ Res CBSInit(Arena arena, CBS cbs, void *owner,
 
   AVERT(CBS, cbs);
   EVENT2(CBSInit, cbs, owner);
-  UNUSED(owner); /* @@@@ hack: unused in non-event varieties */
   CBSLeave(cbs);
   return ResOK;
 }
diff --git a/mps/code/poolamc.c b/mps/code/poolamc.c
index 5901c098512..90b33ef8f68 100644
--- a/mps/code/poolamc.c
+++ b/mps/code/poolamc.c
@@ -1444,8 +1444,6 @@ static Res amcScanNailedOnce(Bool *totalReturn, Bool *moreReturn,
   Bool total = TRUE;
   Size bytesScanned = 0;
 
-  UNUSED(amc); /* Actually only unused when telemetry is off. @@@@ */
-
   EVENT3(AMCScanBegin, amc, seg, ss); /* @@@@ use own event */
 
   format = pool->format;
diff --git a/mps/code/seg.c b/mps/code/seg.c
index 051abc03c79..f12b9fdcbc8 100644
--- a/mps/code/seg.c
+++ b/mps/code/seg.c
@@ -650,7 +650,6 @@ Bool SegCheck(Seg seg)
   TRACT_TRACT_FOR(tract, addr, arena, seg->firstTract, seg->limit) {
     Seg trseg = NULL; /* suppress compiler warning */
 
-    UNUSED(trseg); /* @@@@ unused in hot varieties */
     CHECKL(TractCheck(tract));  /* <design/check/#type.no-sig> */
     CHECKL(TRACT_SEG(&trseg, tract) && (trseg == seg));
     CHECKL(TractWhite(tract) == seg->white);
@@ -1258,7 +1257,6 @@ static void gcSegSetWhite(Seg seg, TraceSet white)
   TRACT_TRACT_FOR(tract, addr, arena, seg->firstTract, limit) {
     Seg trseg = NULL; /* suppress compiler warning */
 
-    UNUSED(trseg); /* @@@@ unused in hot varieties */
     AVER_CRITICAL(TractCheck(tract));  /* <design/check/#type.no-sig> */
     AVER_CRITICAL(TRACT_SEG(&trseg, tract) && (trseg == seg));
     TractSetWhite(tract, white);
-- 
cgit v1.2.1