[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser-racket 637c944 022/191: Displaying variable values
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa/geiser-racket 637c944 022/191: Displaying variable values in autodoc. |
Date: |
Sun, 1 Aug 2021 18:31:52 -0400 (EDT) |
branch: elpa/geiser-racket
commit 637c944ff4f2e449b099ff77a03990dda0bf0f4e
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>
Displaying variable values in autodoc.
---
geiser/autodoc.rkt | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/geiser/autodoc.rkt b/geiser/autodoc.rkt
index 9eb732d..9eaec15 100644
--- a/geiser/autodoc.rkt
+++ b/geiser/autodoc.rkt
@@ -26,17 +26,20 @@
(map (lambda (id) (or (autodoc* id) (list id))) ids)))
(define (autodoc* id)
+ (define (val)
+ (with-handlers ([exn? (const "")])
+ (format "~.a" (namespace-variable-value id))))
(and
(symbol? id)
(let* ([loc (symbol-location* id)]
[name (car loc)]
[path (cdr loc)]
- [sgns (and path (find-signatures path name id))]
- [sgns (and sgns (if (list? sgns) sgns '()))])
+ [sgns (and path (find-signatures path name id))])
(and sgns
`(,id
(name . ,name)
- (args ,@(map format-signature sgns))
+ (value . ,(if (list? sgns) "" (val)))
+ (args ,@(if (list? sgns) (map format-signature sgns) '()))
(module . ,(module-path-name->name path)))))))
(define (format-signature sign)
- [nongnu] elpa/geiser-racket 1facdcd 171/191: racket: indentation for 'shared', (continued)
- [nongnu] elpa/geiser-racket 1facdcd 171/191: racket: indentation for 'shared', Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket c7d936f 174/191: Mark the beginning of code part of elisp libraries with Code: heading, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 8dbb75c 180/191: rkt files to src dir, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 7a62da17 181/191: Import elisp/geiser-racket.el from original repo, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 58e64cb 186/191: A fancier readme title, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 0426f54 188/191: Typo, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 42376b7 189/191: unused variables, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket c8dedf3 004/191: Racket: better autodoc for syntax forms, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 74d80a1 016/191: Racket: following error links in separate window., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 05ff74e 025/191: Racket: better stack traces using errortrace, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 637c944 022/191: Displaying variable values in autodoc.,
Philip Kaludercic <=
- [nongnu] elpa/geiser-racket 2f2fbdd 044/191: Racket: use EOT token for internal communications, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket dd9afbe 048/191: Racket: remote REPLs, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 8160d23 050/191: Partial work (connections working), Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket f83efd0 061/191: Support for implementation-specific font lock keywords, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 2130465 065/191: Racket: showing submodules in module help, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 19e0bd6 094/191: Racket: reading into elisp-land the cache dir as needed, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 4ad7d89 082/191: Racket: eval geiser-eval's apply arguments properly, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 1964a0d 096/191: racket: reading into elisp-land the cache dir as needed, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket dd2bbc3 090/191: Racket: fix for module compilation for recent rackets, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 51cd041 101/191: Image display functionality refactored to its own module, Philip Kaludercic, 2021/08/01