diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2012-04-16 02:01:41 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2012-04-16 02:01:41 +0200 |
| commit | 30231d54fb2801f4c10a952ab5e257cdd5205491 (patch) | |
| tree | bba0979f2eb6e3859a09738d1155da1e8161cd5f | |
| parent | 40f5d8e6a09a7f010c5fc605619512f4d8e1ce98 (diff) | |
| download | geiser-guile-30231d54fb2801f4c10a952ab5e257cdd5205491.tar.gz geiser-guile-30231d54fb2801f4c10a952ab5e257cdd5205491.tar.bz2 | |
Racket: indentation for all 'for' forms
We had only for two of them, and one was wrong!
| -rw-r--r-- | elisp/geiser-racket.el | 31 | ||||
| -rw-r--r-- | elisp/geiser-syntax.el | 2 |
2 files changed, 30 insertions, 3 deletions
diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el index 0d54b78..52f7a32 100644 --- a/elisp/geiser-racket.el +++ b/elisp/geiser-racket.el @@ -249,7 +249,36 @@ This function uses `geiser-racket-init-file' if it exists." (splicing-let-syntaxes 1) (splicing-letrec-syntaxes 1) (splicing-letrec-syntaxes+values 1) - (splicing-local 1)) + (splicing-local 1) + (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) + (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)) + ;;; Remote REPLs diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el index 90c3dc0..eaed0c4 100644 --- a/elisp/geiser-syntax.el +++ b/elisp/geiser-syntax.el @@ -39,8 +39,6 @@ (compound-unit/sig 0) (define: defun) (dynamic-wind 0) - (for/fold 2) - (for/hash 2) (instantiate 2) (interface 1) (lambda: 1) |