[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser-chibi 60464d6 22/38: Add a few minor tweaks.
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa/geiser-chibi 60464d6 22/38: Add a few minor tweaks. |
Date: |
Sun, 1 Aug 2021 18:26:18 -0400 (EDT) |
branch: elpa/geiser-chibi
commit 60464d65652b81cc2a0b61743ab885dbe2fbb138
Author: Lockywolf <lockywolf@gmail.com>
Commit: Lockywolf <lockywolf@gmail.com>
Add a few minor tweaks.
---
scheme/chibi/geiser/geiser.scm | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/scheme/chibi/geiser/geiser.scm b/scheme/chibi/geiser/geiser.scm
index f12cbfc..376e8bf 100644
--- a/scheme/chibi/geiser/geiser.scm
+++ b/scheme/chibi/geiser/geiser.scm
@@ -38,18 +38,19 @@
rest
(guard (err
(else
- (write ; to standard output
+ (write ; to standard output (to comint)
"Geiser-chibi falure in scheme code.")
(show #t err)))
(let* ((output (open-output-string))
+ (form-analyzed (analyze form))
(result (parameterize ((current-output-port output))
(guard (err
(else (show #t err)
(write-to-string (show #f err))))
(if module
(let ((mod (module-env (find-module module))))
- (eval form mod))
- (eval form))))))
+ (eval form-analyzed mod))
+ (eval form-analyzed))))))
(write ; to standard output (to comint)
`((result ,(write-to-string result))
(output . ,(get-output-string output))))))
@@ -102,6 +103,7 @@
'()))))
(define (geiser:autodoc ids . rest)
+ (and #f ( ;; disabled temporarily, because it didn't really work
rest
(cond ((null? ids) '())
((not (list? ids))
@@ -111,7 +113,7 @@
(else
(map (lambda (id)
(geiser:operator-arglist id))
- ids))))
+ ids))))))
(define (geiser:no-values)
#f)
- [nongnu] elpa/geiser-chibi c32bd70 20/38: Rewrite geiser:eval in order to make it compatible with org-babel., (continued)
- [nongnu] elpa/geiser-chibi c32bd70 20/38: Rewrite geiser:eval in order to make it compatible with org-babel., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 354d399 21/38: Allow additional parameters to Chibi binary, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 7606cc3 27/38: Delete trailing whitespace, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi d153c2b 32/38: adapting to new scheme load path, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 9c6afab 36/38: fix for version, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 285d8ba 24/38: Begin the summary lines of all elisp libraries with three semicolons, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 5e7ba0f 25/38: Mark the beginning of code part of elisp libraries with Code: heading, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi bdde589 15/38: Add better support for geiser:symbol-location. Add guards., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi c7beaf1 17/38: Fix a comment typo., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi b92c0c9 19/38: Add a TODO entry for adding output to erroneous evaluations., Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 60464d6 22/38: Add a few minor tweaks.,
Philip Kaludercic <=
- [nongnu] elpa/geiser-chibi 9f33e8d 26/38: Fix indentation, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 697bf63 30/38: imported files moved to new locations, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 65df173 31/38: license and readme, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi fa3bd28 34/38: preparing MELPA submission, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 7eda792 33/38: typo, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 54e7f38 37/38: fix: auto-activate implementation, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 8d7e02a 35/38: fix for homepage, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-chibi 6f59291 38/38: Use new implementation extension declarator, Philip Kaludercic, 2021/08/01