From 1df6ba9d0910f4ebe693ee2b84234aa31865c929 Mon Sep 17 00:00:00 2001
From: Tony Mann <tony@harlequin.com>
Date: Thu, 16 Dec 1999 15:27:48 +0000
Subject: [PATCH] Change.mps.dylan.kinglet.170494

Pass class to SegAlloc

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

diff --git a/mps/src/poolmv2.c b/mps/src/poolmv2.c
index 2313a86e77e..181ae8ad665 100644
--- a/mps/src/poolmv2.c
+++ b/mps/src/poolmv2.c
@@ -1,6 +1,6 @@
 /* impl.c.poolmv2: MANUAL VARIABLE POOL, II
  *
- * $HopeName: MMsrc!poolmv2.c(trunk.11) $
+ * $HopeName: MMsrc!poolmv2.c(trunk.12) $
  * Copyright (C) 1998 Harlequin Group plc.  All rights reserved.
  *
  * .readership: any MPS developer
@@ -18,7 +18,7 @@
 #include "cbs.h"
 #include "meter.h"
 
-SRCID(poolmv2, "$HopeName: MMsrc!poolmv2.c(trunk.11) $");
+SRCID(poolmv2, "$HopeName: MMsrc!poolmv2.c(trunk.12) $");
 
 
 /* Signatures */
@@ -908,7 +908,8 @@ size_t mps_mv2_free_size(mps_pool_t mps_pool)
 static Res MV2SegAlloc(Seg *segReturn, MV2 mv2, Size size, 
                        Pool pool, Bool withReservoirPermit)
 {
-  Res res = SegAlloc(segReturn, MV2SegPref(mv2), size, pool,
+  Res res = SegAlloc(segReturn, EnsureGCSegClass(), 
+                     MV2SegPref(mv2), size, pool,
                      withReservoirPermit);
 
   if (res == ResOK) {