security-and-privacy/gnupg
security-and-privacy/gnupg
1
0
Fork 0
mirror of git://git.gnupg.org/gnupg.git synced 2025-01-18 14:17:03 +01:00
Code Activity

gpgscm: Recover more cells.

Browse Source 
* tests/gpgscm/scheme.c (_s_return): Recover the cell holding the
opcode.

Fixes-commit: e0cbd3389e2dd6ec19ee3a4c7bad81fa0f1907f5
Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
Justus Winter 2016-11-15 11:07:57 +01:00
parent 2cd281c4de
commit 93cc322ac0
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
tests/gpgscm/scheme.c
View File

@ -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);