From a7c2557dfcfa8b0809cb6ee7ed8718e068da2000 Mon Sep 17 00:00:00 2001
From: Helmut Eller <eller.helmut@gmail.com>
Date: Sat, 11 Oct 2025 20:15:09 +0200
Subject: [PATCH] * mps/code/poolawl.c (AWL0Init): Stick to C89.

---
 mps/code/poolawl.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mps/code/poolawl.c b/mps/code/poolawl.c
index 6f9fed3caa4..1a4102eaf26 100644
--- a/mps/code/poolawl.c
+++ b/mps/code/poolawl.c
@@ -1426,13 +1426,13 @@ static Bool AWL0PoolCheck(AWL0Pool awl0)
 static Res AWL0Init(Pool pool, Arena arena, PoolClass klass,
                     ArgList args)
 {
+  AWL0Pool awl0;
   Res res
       = NextMethod(Pool, AWL0Pool, init)(pool, arena, klass, args);
   if (res != ResOK)
     return res;
 
-  AWL0Pool awl0 = CouldBeA(AWL0Pool, pool);
-
+  awl0 = CouldBeA(AWL0Pool, pool);
   SetClassOfPoly(pool, CLASS(AWL0Pool));
   awl0->sig = AWL0Sig;
   AVERC(AWL0Pool, awl0);