From a809bc0f49ee4c6e777f39d1f80ee57862a0fcab Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Wed, 1 Apr 2026 22:24:22 +0200 Subject: Initial import of the code into git --- src/readline.c | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 src/readline.c (limited to 'src/readline.c') diff --git a/src/readline.c b/src/readline.c new file mode 100644 index 0000000..bda4df9 --- /dev/null +++ b/src/readline.c @@ -0,0 +1,56 @@ +/* Aplwc - A Programming Language With Constraints + * + * Copyright (C) 2026 Peter Mikkelsen + * + * This file is part of aplwc. + * + * Aplwc is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * Aplwc is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with aplwc. If not, see . + */ + +#include +#include +#include "readline.h" + +static struct aplwc *aplwc; +static char **completions; +static int completion_index; + +static char **complete(const char *, int, int); +static char *get_completion(const char *, int); + +void +init_readline(struct aplwc *_aplwc) +{ + aplwc = _aplwc; + rl_readline_name = "aplwc"; + rl_attempted_completion_function = complete; +} + +static char ** +complete(const char *text, int start, int end) +{ + rl_attempted_completion_over = 1; + completions = aplwc_autocomplete(aplwc, rl_line_buffer, start, end); + char **result = NULL; + if(completions) + result = rl_completion_matches(text, get_completion); + free(completions); + return result; +} + +static char * +get_completion(const char *text, int state) +{ + return completions[state]; +} -- cgit v1.2.3