gpgscm: Fix build with object list.

* tests/gpgscm/scheme.c (oblist_add_by_name): Provide preallocation
information if USE_OBJECT_LIST.

Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
Justus Winter 2017-01-31 12:43:00 +01:00
parent 2076cdaf6b
commit 8f0ecb16cb
1 changed files with 1 additions and 0 deletions

View File

@ -1151,6 +1151,7 @@ static INLINE pointer oblist_find_by_name(scheme *sc, const char *name)
/* returns the new symbol */
static pointer oblist_add_by_name(scheme *sc, const char *name)
{
#define oblist_add_by_name_allocates 3
pointer x;
x = immutable_cons(sc, mk_string(sc, name), sc->NIL);