aboutsummaryrefslogtreecommitdiffstats
path: root/tests/gpgscm/scheme.c
diff options
context:
space:
mode:
authorJustus Winter <[email protected]>2016-01-22 10:13:14 +0000
committerJustus Winter <[email protected]>2016-06-17 09:38:00 +0000
commit13bba1357478815a85f5c0db3607ebb6cd574f56 (patch)
tree7e7a371472e28fa53813f11fb82bde1686e779a4 /tests/gpgscm/scheme.c
parenttests/gpgscm: Fix error hook. (diff)
downloadgnupg-13bba1357478815a85f5c0db3607ebb6cd574f56.tar.gz
gnupg-13bba1357478815a85f5c0db3607ebb6cd574f56.zip
tests/gpgscm: Nicer error message.
* tests/gpgscm/scheme.c (opexe_0): Include the value that we tried to evaluate as function-like in the error message. Signed-off-by: Justus Winter <[email protected]>
Diffstat (limited to '')
-rw-r--r--tests/gpgscm/scheme.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c
index 220eed3d9..fba107131 100644
--- a/tests/gpgscm/scheme.c
+++ b/tests/gpgscm/scheme.c
@@ -2683,7 +2683,7 @@ static pointer opexe_0(scheme *sc, enum scheme_opcodes op) {
sc->dump = cont_dump(sc->code);
s_return(sc,sc->args != sc->NIL ? car(sc->args) : sc->NIL);
} else {
- Error_0(sc,"illegal function");
+ Error_1(sc,"illegal function",sc->code);
}
case OP_DOMACRO: /* do macro */