diff options
| author | Keith Packard <keithp@keithp.com> | 2018-01-06 18:11:19 -0800 |
|---|---|---|
| committer | Keith Packard <keithp@keithp.com> | 2018-01-06 18:11:19 -0800 |
| commit | b446d9657cad0ff45f6f65c774d82cb9f2f65088 (patch) | |
| tree | 07f482031d8657d2b39eb0c661c0ee40b2430748 /src/scheme | |
| parent | 16061947d4376b41e596d87f97ec53ec29d17644 (diff) | |
altos/lambdakey-v1.0: Switch back to command buffered input
Instead of just reading from stdin with no echo or editing.
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/scheme')
| -rw-r--r-- | src/scheme/ao_scheme_read.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/scheme/ao_scheme_read.c b/src/scheme/ao_scheme_read.c index a26965f2..f9630d39 100644 --- a/src/scheme/ao_scheme_read.c +++ b/src/scheme/ao_scheme_read.c @@ -150,6 +150,10 @@ static const uint16_t lex_classes[128] = { static int lex_unget_c; +#ifndef ao_scheme_getc +#define ao_scheme_getc(f) getc(f) +#endif + static inline int lex_get(FILE *in) { @@ -158,7 +162,7 @@ lex_get(FILE *in) c = lex_unget_c; lex_unget_c = 0; } else { - c = getc(in); + c = ao_scheme_getc(in); } return c; } |