From 99f2473bd85fa0b2f8a406044b2cc49490057070 Mon Sep 17 00:00:00 2001
From: Gareth Rees <gdr@ravenbrook.com>
Date: Wed, 11 Jun 2014 17:27:25 +0100
Subject: [PATCH] One last occurrence of arena->alignment.

Copied from Perforce
 Change: 186504
 ServerID: perforce.ravenbrook.com
---
 mps/code/arena.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mps/code/arena.c b/mps/code/arena.c
index 5d926a8f6f8..2c95a201e2b 100644
--- a/mps/code/arena.c
+++ b/mps/code/arena.c
@@ -312,8 +312,8 @@ Res ArenaCreate(Arena *arenaReturn, ArenaClass class, ArgList args)
   if (res != ResOK)
     goto failInit;
 
-  /* arena->alignment must have been set up by *class->init() */
-  if (arena->grainSize > ((Size)1 << arena->zoneShift)) {
+  /* Grain size must have been set up by *class->init() */
+  if (ArenaGrainSize(arena) > ((Size)1 << arena->zoneShift)) {
     res = ResMEMORY; /* size was too small */
     goto failStripeSize;
   }