summaryrefslogtreecommitdiff
path: root/src/lambdakey-v1.0/ao_lambdakey.c
diff options
context:
space:
mode:
authorBdale Garbee <bdale@gag.com>2019-01-02 22:23:04 -0700
committerBdale Garbee <bdale@gag.com>2019-01-02 22:23:04 -0700
commitb340cbf1403a5f5b181a215935f713a50da8e5e4 (patch)
tree8c0d2afbe8168c29584e0d568b80353fdf555883 /src/lambdakey-v1.0/ao_lambdakey.c
parent1da4b57545233f2f2afd350bd8aed4ef7bb0c844 (diff)
parent95ffec073b0758801df04a77eca0bd2bc6e57e35 (diff)
Merge branch 'branch-1.9' into debian
Diffstat (limited to 'src/lambdakey-v1.0/ao_lambdakey.c')
-rw-r--r--src/lambdakey-v1.0/ao_lambdakey.c15
1 files changed, 15 insertions, 0 deletions
diff --git a/src/lambdakey-v1.0/ao_lambdakey.c b/src/lambdakey-v1.0/ao_lambdakey.c
index f1a2aa38..a608d8e4 100644
--- a/src/lambdakey-v1.0/ao_lambdakey.c
+++ b/src/lambdakey-v1.0/ao_lambdakey.c
@@ -24,6 +24,21 @@ static const struct ao_cmds blink_cmds[] = {
{ 0, 0 }
};
+int
+_ao_scheme_getc(void)
+{
+ static uint8_t at_eol;
+ int c;
+
+ if (at_eol) {
+ ao_cmd_readline(ao_scheme_read_list ? "Λ " : "λ ");
+ at_eol = 0;
+ }
+ c = (unsigned char) ao_cmd_lex();
+ if (c == '\n')
+ at_eol = 1;
+ return c;
+}
void main(void)
{