[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/geiser-racket 2097d2b 110/191: Little clean-ups to the ind
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa/geiser-racket 2097d2b 110/191: Little clean-ups to the indentation rules |
Date: |
Sun, 1 Aug 2021 18:32:10 -0400 (EDT) |
branch: elpa/geiser-racket
commit 2097d2b093cdf2af0ea1638f825b3dd7b577ce59
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>
Little clean-ups to the indentation rules
Splitting better the specially indented forms between our two
implementations, so that users of a single one don't get weird
indentations for froms without a special meaning in their scheme.
Ideally, we should make these indentation rules buffer-local, so that
when a user is in a, say, Guile buffer, module+ has no special
indentation (as is the case now if that user also has activated
support for Racket).
---
elisp/geiser-racket.el | 77 ++++++++++++++++++++++++++++++++++----------------
1 file changed, 53 insertions(+), 24 deletions(-)
diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index fe4b578..a5b2f37 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -253,6 +253,7 @@ using start-geiser, a procedure in the geiser/server
module."
;;; Keywords and syntax
+
(defun geiser-racket--keywords ()
(append '(("^#lang\\>" . 0)
("\\[\\(else\\)\\>" . 1))
@@ -261,30 +262,12 @@ using start-geiser, a procedure in the geiser/server
module."
. 1)))))
(geiser-syntax--scheme-indent
- (splicing-let 1)
- (splicing-letrec 1)
- (splicing-let-values 1)
- (splicing-letrec-values 1)
- (splicing-let-syntax 1)
- (splicing-letrec-syntax 1)
- (splicing-let-syntaxes 1)
- (splicing-letrec-syntaxes 1)
- (splicing-letrec-syntaxes+values 1)
- (splicing-local 1)
+ (begin0 1)
+ (case-lambda: 0)
+ (class* defun)
+ (compound-unit/sig 0)
+ (define: defun)
(for 1)
- (for/and 1)
- (for/first 1)
- (for/fold 2)
- (for/hash 1)
- (for/hasheq 1)
- (for/hasheqv 1)
- (for/last 1)
- (for/list 1)
- (for/lists 2)
- (for/or 1)
- (for/product 1)
- (for/sum 1)
- (for/vector 1)
(for* 1)
(for*/and 1)
(for*/first 1)
@@ -299,7 +282,53 @@ using start-geiser, a procedure in the geiser/server
module."
(for*/product 1)
(for*/sum 1)
(for*/vector 1)
- (module+ defun))
+ (for/and 1)
+ (for/first 1)
+ (for/fold 2)
+ (for/hash 1)
+ (for/hasheq 1)
+ (for/hasheqv 1)
+ (for/last 1)
+ (for/list 1)
+ (for/lists 2)
+ (for/or 1)
+ (for/product 1)
+ (for/sum 1)
+ (for/vector 1)
+ (instantiate 2)
+ (interface 1)
+ (lambda/kw 1)
+ (lambda: 1)
+ (let*-values: 1)
+ (let+ 1)
+ (let-values: 1)
+ (let/cc: 1)
+ (let: 1)
+ (letrec-values: 1)
+ (letrec: 1)
+ (mixin 2)
+ (module defun)
+ (module+ defun)
+ (parameterize-break 1)
+ (quasisyntax/loc 1)
+ (send* 1)
+ (splicing-let 1)
+ (splicing-let-syntax 1)
+ (splicing-let-syntaxes 1)
+ (splicing-let-values 1)
+ (splicing-letrec 1)
+ (splicing-letrec-syntax 1)
+ (splicing-letrec-syntaxes 1)
+ (splicing-letrec-syntaxes+values 1)
+ (splicing-letrec-values 1)
+ (splicing-local 1)
+ (syntax-id-rules defun)
+ (syntax/loc 1)
+ (type-case defun)
+ (unit defun)
+ (unit/sig 2)
+ (with-handlers 1)
+ (with-handlers: 1))
- [nongnu] elpa/geiser-racket 32ae602 052/191: Elisp support for inferior schemes, (continued)
- [nongnu] elpa/geiser-racket 32ae602 052/191: Elisp support for inferior schemes, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket fa2f509 099/191: Merge branch 'master' of git.sv.gnu.org:/srv/git/geiser, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket ed810eb 072/191: Revert "Bug fix: don't intern symbols read by scheme reader", Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket d8fd4cc 073/191: A couple of uses of intern replaced by make-symbol, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 0f063c5 087/191: ,cd for Racket REPL, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket cf3e1bd 092/191: Racket: configurable image cache directory, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 2d5e638 078/191: Racket: ', enter "foo"' as a synonym of ', enter (file "foo")', Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket aff860d 098/191: Merge branch 'master' of git.sv.gnu.org:/srv/git/geiser, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 216067a 104/191: Racket: new option to specify network interface for REPL server, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 01caa95 120/191: Another take at the fix (files with >, bleh), Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 2097d2b 110/191: Little clean-ups to the indentation rules,
Philip Kaludercic <=
- [nongnu] elpa/geiser-racket aa40a48 106/191: racket: fix re-loading of modules with submodules (e.g. plai-typed), Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket ba98c40 119/191: Racket: accepting spaces within comint's prompt, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket fad35c6 125/191: Racket: pre-loading help also in remote REPLs, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket efb71a2 127/191: Racket: ensuring the first C-c C-d C-i works, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket fd12248 128/191: Racket: correct detection of manual lookup failures, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket e469ace 134/191: For crazy guys that use (define/match [foo bar] ...), Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 0c9d6c3 055/191: Guile reconnected (but not debuggable (yet)), Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket fbbd3ab 060/191: Superior schemes, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket 58657b4 056/191: Better EOT token for more robust communication, Philip Kaludercic, 2021/08/01
- [nongnu] elpa/geiser-racket fd14450 062/191: Support for implementation-specific font lock keywords, Philip Kaludercic, 2021/08/01