Exclude verbose method names from completion candidates.

Cf. #1039
shirok · Jun 5, 2024 · 74c77ba · 74c77ba
1 parent fa20d5a
commit 74c77ba
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 1 deletion.
diff --git a/ChangeLog b/ChangeLog
@@ -1,3 +1,9 @@
+2024-06-05  Shiro Kawai  <shiro@acm.org>
+
+	* lib/gauche/interactive/completion.scm (%complete-symbol): Exclude
+	  verbose method names from completion candidates.
+	  Cf. https://github.com/shirok/Gauche/issues/1039
+
 2024-06-02  Shiro Kawai  <shiro@acm.org>
 
 	* lib/gauche/parseopt.scm (let-args, option-parser-help-string):

diff --git a/lib/gauche/interactive/completion.scm b/lib/gauche/interactive/completion.scm
@@ -97,7 +97,8 @@
         ($ hash-table-for-each (module-table m)
            (^[sym _]
              (let1 s (symbol->string sym)
-               (when (matcher s)
+               (when (and (not (#/\(/ s)) ;heuristics to exclude verbose method names
+                          (matcher s))
                  (hash-table-put! hits s #t)))))))
     (search mod)
     (dolist [m (module-imports mod)]