tisp

tiny lisp
git clone git://edryd.org/tisp
Log | Files | Refs | LICENSE

commit 723b82ae34443274e5c526fb7356483e234ccb03
parent 21d4785b9af24255b41792db16ede0a2955f0b7e
Author: Ed van Bruggen <edvb@uw.edu>
Date:   Tue,  1 Oct 2019 00:07:23 -0700

Don't use print format when unneeded and unsafe

Diffstat:
tisp.c | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tisp.c b/tisp.c @@ -761,7 +761,7 @@ tisp_print(FILE *f, Val v) fprintf(f, "\"%s\"", v->v.s); break; case SYMBOL: - fprintf(f, v->v.s); + fputs(v->v.s, f); break; case PRIMITIVE: fprintf(f, "#<primitive>");