mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-16 02:50:26 -08:00
Code Issues Projects Releases Wiki Activity

* mps/code/poolawl.c (AWL0Init): Stick to C89.

Browse source
This commit is contained in:
Helmut Eller 2025-10-11 20:15:09 +02:00
parent 1fab3ccc3c
commit a7c2557dfc
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
mps/code/poolawl.c
View file

@ -1426,13 +1426,13 @@ static Bool AWL0PoolCheck(AWL0Pool awl0)
static Res AWL0Init(Pool pool, Arena arena, PoolClass klass, static Res AWL0Init(Pool pool, Arena arena, PoolClass klass,
ArgList args) ArgList args)
{ {
AWL0Pool awl0;
Res res Res res
= NextMethod(Pool, AWL0Pool, init)(pool, arena, klass, args); = NextMethod(Pool, AWL0Pool, init)(pool, arena, klass, args);
if (res != ResOK) if (res != ResOK)
return res; return res;
AWL0Pool awl0 = CouldBeA(AWL0Pool, pool); awl0 = CouldBeA(AWL0Pool, pool);
SetClassOfPoly(pool, CLASS(AWL0Pool)); SetClassOfPoly(pool, CLASS(AWL0Pool));
awl0->sig = AWL0Sig; awl0->sig = AWL0Sig;
AVERC(AWL0Pool, awl0); AVERC(AWL0Pool, awl0);