commit 8d9d4598ab5b8e01b199929eae9521ee6c21fd68 parent 0dbe4d2ebdf287c5b1cbc75bc9128711fa7a43b9 Author: Tomas Hlavaty <tom@logand.com> Date: Fri, 29 Apr 2011 00:00:25 +0200 temporary comments added to swank:fuzzy-completions Diffstat:
| M | swank-picolisp.l | | | 8 | +++++++- |
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/swank-picolisp.l b/swank-picolisp.l @@ -149,9 +149,15 @@ (println 'swank:buffer-first-change File) (flush) ) +#"Two" "PIL2" :limit 300 :time-limit-in-msec 1500 (de swank:fuzzy-completions (Str Pkg . @) ## TODO how to get list of all (interned) symbols for completion? - ) + ##(list (head 10 (mapcar '((X) (list (sym X) 1 '((0 "a") (1 "b")) 'nil)) (all))) 'nil) + ## '((("multiple-value-bind" 26.588236 ((0 "m") (9 "v") (15 "b")) (:FBOUNDP :MACRO)) + ## ("multiple-value-bind" 26.588236 ((0 "m") (9 "v") (15 "b")) (:FBOUNDP :MACRO)) + ## ("multiple-value-bind" 26.588236 ((0 "m") (9 "v") (15 "b")) nil) ) + ## nil ) + ) (de swank:fuzzy-completion-selected (Nm Compl) )