mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

Snc requires a format, so it needs a varargs decoder.

Browse source 
Copied from Perforce
 Change: 182256
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Gareth Rees 2013-05-27 10:14:38 +01:00
parent 81a10327c0
commit b6c356d1d8
1 changed files with 12 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

12
mps/code/poolsnc.c
View file

@ -359,6 +359,17 @@ static Bool sncFindFreeSeg(Seg *segReturn, SNC snc, Size size)
}
/* SNCVarargs -- decode obsolete varargs */
static void SNCVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
{
args[0].key = MPS_KEY_FORMAT;
args[0].val.format = va_arg(varargs, Format);
args[1].key = MPS_KEY_ARGS_END;
AVER(ArgListCheck(args));
}
/* SNCInit -- initialize an SNC pool */
static Res SNCInit(Pool pool, ArgList args)
@ -664,6 +675,7 @@ DEFINE_POOL_CLASS(SNCPoolClass, this)
this->name = "SNC";
this->size = sizeof(SNCStruct);
this->offset = offsetof(SNCStruct, poolStruct);
this->varargs = SNCVarargs;
this->init = SNCInit;
this->finish = SNCFinish;
this->bufferFill = SNCBufferFill;