[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser-guile 1c50bcb 072/284: Improvements to module name
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa/geiser-guile 1c50bcb 072/284: Improvements to module name support (using prefixes) and Guile support. |
Date: |
Sun, 1 Aug 2021 18:29:18 -0400 (EDT) |
branch: elpa/geiser-guile
commit 1c50bcb1e89ecad683148a4e67fecfc1d82a93ce
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>
Improvements to module name support (using prefixes) and Guile support.
---
geiser/completion.scm | 9 ++++++++-
geiser/emacs.scm | 2 +-
geiser/modules.scm | 13 ++++++-------
3 files changed, 15 insertions(+), 9 deletions(-)
diff --git a/geiser/completion.scm b/geiser/completion.scm
index 4906368..f4342bb 100644
--- a/geiser/completion.scm
+++ b/geiser/completion.scm
@@ -25,8 +25,9 @@
;;; Code:
(define-module (geiser completion)
- #:export (completions)
+ #:export (completions module-completions)
#:use-module (geiser utils)
+ #:use-module (geiser modules)
#:use-module (ice-9 session)
#:use-module (ice-9 regex))
@@ -53,4 +54,10 @@
(loop (cons 'let (body form)) (cons (cadr form) bindings)))
(else (loop (cdr form) bindings)))))
+(define (module-completions prefix)
+ (let* ((prefix (string-append "^" (regexp-quote prefix)))
+ (matcher (lambda (s) (string-match prefix s)))
+ (names (filter matcher (all-modules))))
+ (sort! names string<?)))
+
;;; completions.scm ends here
diff --git a/geiser/emacs.scm b/geiser/emacs.scm
index 13bd8db..106b8b1 100644
--- a/geiser/emacs.scm
+++ b/geiser/emacs.scm
@@ -32,10 +32,10 @@
ge:load-file
ge:autodoc
ge:completions
+ ge:module-completions
ge:symbol-location
ge:generic-methods
ge:symbol-documentation
- ge:all-modules
ge:module-children
ge:module-location
ge:callers
diff --git a/geiser/modules.scm b/geiser/modules.scm
index fdc3f3f..834e51c 100644
--- a/geiser/modules.scm
+++ b/geiser/modules.scm
@@ -57,13 +57,12 @@
(define (all-modules)
(let ((roots ((@@ (ice-9 session) root-modules))))
- (sort! (map (lambda (m)
- (format "~A" (module-name m)))
- (fold (lambda (m all)
- (append (all-child-modules m) all))
- roots
- roots))
- string<?)))
+ (map (lambda (m)
+ (format "~A" (module-name m)))
+ (fold (lambda (m all)
+ (append (all-child-modules m) all))
+ roots
+ roots))))
(define (module-children mod-name)
(let* ((elts (hash-fold classify-module-object
- [nongnu] elpa/geiser-guile 8552404 176/284: Guile: using meta-commands to talk with Guile, (continued)
- [nongnu] elpa/geiser-guile 8552404 176/284: Guile: using meta-commands to talk with Guile, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 1a35206 150/284: More docs., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile e2e3a0d 151/284: Redisplaying the prompt after empty lines on the REPL., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 640e9bc 125/284: Guile: fix for macroexpand., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 855f6f2 153/284: Guile: fix for import module REPL command, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 19ed2c0 157/284: Guile: don't create empty modules before loading them, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 480767e 162/284: Guile: geiser-guile-jump-on-debug-p, geiser-guile-show-debug-help-p, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile b95b487 165/284: Guile: fix bug in error display, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 30c656f 061/284: Support for multiple Scheme implementations, Chapter 1., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 28722c0 068/284: Bug fix: really remove killed buffers from the list of closed repls., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 1c50bcb 072/284: Improvements to module name support (using prefixes) and Guile support.,
Philip Kaludercic <=
- [nongnu] elpa/geiser-guile bb5b1cb 076/284: Guile: customizable load path., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile f9be2bc 080/284: Guile: better stack trace display., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile cb05947 078/284: Guile: rewriting stack trace captures - not yet complete., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 789248b 082/284: Guile: backtrace buttonization., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 6590f6b 081/284: Guile: Bug fix in the latest evaluation code changes., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 67905aa 084/284: Simpler, nicer, more efficient handling of evaluation results. It, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 387d557 095/284: Reload: we now remember user customizations and restore them during geiser-reload., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 417460b 099/284: Multiple arity display, used by PLT backend (case-lambda)., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 360343e 092/284: Fixes for all byte-compilation warnings., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-guile 3cb7a6c 087/284: Guile: fix for rest marker in autodoc., Philip Kaludercic, 2021/08/01