gpgscm: Fix build with list environments.

* tests/gpgscm/scheme.c (new_slot_spec_in_env): Provide preallocation
inforomation if USE_ALIST_ENV.

Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
Justus Winter 2017-01-31 13:53:28 +01:00
parent cea6d114b6
commit 874424ee3c
1 changed files with 1 additions and 0 deletions

View File

@ -2699,6 +2699,7 @@ static INLINE void new_frame_in_env(scheme *sc, pointer old_env)
static INLINE void new_slot_spec_in_env(scheme *sc, pointer env,
pointer variable, pointer value)
{
#define new_slot_spec_in_env_allocates 2
car(env) = immutable_cons(sc, immutable_cons(sc, variable, value), car(env));
}