security-and-privacy/gnupg
security-and-privacy/gnupg
1
0
Fork 0
mirror of git://git.gnupg.org/gnupg.git synced 2025-03-27 22:39:59 +01:00
Code Activity

gpgscm: Fix calculating the line number.

Browse Source 
* tests/gpgscm/scheme.c (opexe_5): Only increment the line number on
newlines.

Fixes-commit: 7cc57e2c63d0fa97569736419db5c76117e7685b
Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
Justus Winter 2017-02-28 16:17:33 +01:00
parent d379a0174c
commit 058c97f9fc
No known key found for this signature in database
GPG Key ID: DD1A52F9DA8C9020
1 changed files with 2 additions and 2 deletions

4
tests/gpgscm/scheme.c

@ -5045,8 +5045,8 @@ static pointer opexe_5(scheme *sc, enum scheme_opcodes op) {
int c = inchar(sc); int c = inchar(sc);
if (c != '\n') if (c != '\n')
backchar(sc,c); backchar(sc,c);
port_increment_current_line(sc, else
&sc->load_stack[sc->file_i], 1); port_increment_current_line(sc, &sc->load_stack[sc->file_i], 1);
sc->nesting_stack[sc->file_i]--; sc->nesting_stack[sc->file_i]--;
s_return(sc,reverse_in_place(sc, sc->NIL, sc->args)); s_return(sc,reverse_in_place(sc, sc->NIL, sc->args));
} else if (sc->tok == TOK_DOT) { } else if (sc->tok == TOK_DOT) {