gpgscm: Fix build with list environments.
authorJustus Winter <justus@g10code.com>
Tue, 31 Jan 2017 12:53:28 +0000 (13:53 +0100)
committerJustus Winter <justus@g10code.com>
Tue, 31 Jan 2017 17:49:27 +0000 (18:49 +0100)
* tests/gpgscm/scheme.c (new_slot_spec_in_env): Provide preallocation
inforomation if USE_ALIST_ENV.

Signed-off-by: Justus Winter <justus@g10code.com>
tests/gpgscm/scheme.c

index fe16d48..d2c3dfc 100644 (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));
 }