tisp

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

commit 1ed7b501230f6b87a1ea9d13441d572c51f2a6ca
parent d124a98e22b9b10db23892ec77fa3caab34f4982
Author: Ed van Bruggen <edvb@uw.edu>
Date:   Sat, 24 Oct 2020 23:17:50 -0700

Only print character not able to be read

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

diff --git a/tisp.c b/tisp.c @@ -586,7 +586,7 @@ tisp_read(Tsp st) tsp_finc(st); return read_pair(st); } - tsp_warnf("could not read given input '%s'", st->file+st->filec); + tsp_warnf("could not read given input '%c'", st->file[st->filec]); } /* return string containing contents of file name */