aboutsummaryrefslogtreecommitdiffstats
path: root/tests/gpgscm/scheme.c
diff options
context:
space:
mode:
authorJustus Winter <[email protected]>2016-09-06 14:35:40 +0000
committerJustus Winter <[email protected]>2016-09-06 14:46:31 +0000
commitf2249b737055f84842778285bbeff5e61fa55225 (patch)
treec295d1f3d8a8c30ca2cb935b8a6162a29ed46165 /tests/gpgscm/scheme.c
parenttests: Fix test. (diff)
downloadgnupg-f2249b737055f84842778285bbeff5e61fa55225.tar.gz
gnupg-f2249b737055f84842778285bbeff5e61fa55225.zip
gpgscm: Fix detection of unbalanced parenthesis.
* tests/gpgscm/main.c (load): Print error message. * tests/gpgscm/scheme.c (opexe_0): Correctly report nesting level when loading files. Signed-off-by: Justus Winter <[email protected]>
Diffstat (limited to 'tests/gpgscm/scheme.c')
-rw-r--r--tests/gpgscm/scheme.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c
index 987f5af7d..1fc764356 100644
--- a/tests/gpgscm/scheme.c
+++ b/tests/gpgscm/scheme.c
@@ -2592,6 +2592,7 @@ static pointer opexe_0(scheme *sc, enum scheme_opcodes op) {
if(sc->file_i == 0)
{
sc->args=sc->NIL;
+ sc->nesting = sc->nesting_stack[0];
s_goto(sc,OP_QUIT);
}
else