diff --git a/mps/code/poollo.c b/mps/code/poollo.c
index e022963c14b..06d3e68160f 100644
--- a/mps/code/poollo.c
+++ b/mps/code/poollo.c
@@ -189,7 +189,7 @@ static void loSegFinish(Seg seg)
 
 
 ATTRIBUTE_UNUSED
-static Count loSegBits(LOSeg loseg)
+static Count loSegGrains(LOSeg loseg)
 {
   LO lo;
   Size size;