From e6099c5e9ced9dcd831707318e9d85287e6c804c Mon Sep 17 00:00:00 2001
From: David Jones <drj@ravenbrook.com>
Date: Fri, 20 Jul 2007 11:51:35 +0100
Subject: [PATCH] Mps: int -> index

Copied from Perforce
 Change: 162958
 ServerID: perforce.ravenbrook.com
---
 mps/code/trace.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mps/code/trace.c b/mps/code/trace.c
index 14f8cc72c7c..cdf04b4a88e 100644
--- a/mps/code/trace.c
+++ b/mps/code/trace.c
@@ -846,7 +846,7 @@ static void traceFlip(Trace trace)
 static void traceCopySizes(Trace trace)
 {
   Ring node, nextNode;
-  int i;
+  Index i;
   Arena arena = trace->arena;
 
   RING_FOR(node, &arena->chainRing, nextNode) {