mirror of
git://git.gnupg.org/gnupg.git
synced 2024-06-11 23:59:50 +02:00
gpgscm: Recover more cells.
* tests/gpgscm/scheme.c (_s_return): Recover the cell holding the
opcode.
Fixes-commit: e0cbd3389e
Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
2cd281c4de
commit
93cc322ac0
|
@ -2643,6 +2643,7 @@ static pointer _s_return(scheme *sc, pointer a, int enable_gc) {
|
||||||
return sc->NIL;
|
return sc->NIL;
|
||||||
free_cons(sc, dump, &op, &dump);
|
free_cons(sc, dump, &op, &dump);
|
||||||
sc->op = ivalue(op);
|
sc->op = ivalue(op);
|
||||||
|
free_cell(sc, op);
|
||||||
free_cons(sc, dump, &sc->args, &dump);
|
free_cons(sc, dump, &sc->args, &dump);
|
||||||
free_cons(sc, dump, &sc->envir, &dump);
|
free_cons(sc, dump, &sc->envir, &dump);
|
||||||
free_cons(sc, dump, &sc->code, &sc->dump);
|
free_cons(sc, dump, &sc->code, &sc->dump);
|
||||||
|
|
Loading…
Reference in New Issue
Block a user