From 8b3eb12947305ad3636227b7bfe6132f39b1028f Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 6 Sep 2015 07:26:35 -0700 Subject: Parenthesis sensitivity for completion. * eval.c (boundp): Static function becomes extern. * eval.h (boundp): Declared. * parser.c (find_matching_syms): New par parameter lets function determine whether previous character is a an open parenthesis or brace, based on which the set of possible completions is restricted. (provide_completions): Calculate the par parameter and pass to find_matching_syms. --- eval.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'eval.c') diff --git a/eval.c b/eval.c index 1e5919cf..2afc431c 100644 --- a/eval.c +++ b/eval.c @@ -3423,7 +3423,7 @@ static val symbol_function(val sym) gethash(op_table, sym)); } -static val boundp(val sym) +val boundp(val sym) { return if2(lookup_var(nil, sym) || lookup_symac(nil, sym), t); } -- cgit v1.2.3