mirror of git://git.gnupg.org/gnupg.git
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;
|
||||
free_cons(sc, dump, &op, &dump);
|
||||
sc->op = ivalue(op);
|
||||
free_cell(sc, op);
|
||||
free_cons(sc, dump, &sc->args, &dump);
|
||||
free_cons(sc, dump, &sc->envir, &dump);
|
||||
free_cons(sc, dump, &sc->code, &sc->dump);
|
||||
|
|
Loading…
Reference in New Issue