如何讓emacs縮進縮進定義的其他東西？

Question

因此，Emacs在編輯Scheme/Racket/Lisp代碼方面非常出色。它所做的一件好事是當你鍵入如下代碼：

(define (make-position-table) 
    (for/list ([i (in-range 256)]) 
      `())) 

它做了一件非常聰明的事情，並將第二行縮進兩列。現在，第三行對所有參數進行對齊的所有lisp代碼和縮進都做了什麼。

如何定製Emacs，使其縮進第三行，就好像我正在引入一個新的主體。我想的是：

(define (make-position-table) 
    (for/list ([i (in-range 256)]) 
    `())) 

我猜這是可能的，我只是還沒有想出了神祕的Emacs變量來設置。有誰知道如何做到這一點？

Answer 1

您可以添加到您的.emacs文件：

(put 'for/list 'scheme-indent-function 1) 

也看到了hacked version of scheme mode，做更多的球拍主義。

Answer 2

我相信(put 'for/list 'scheme-indent-function 'defun)應該做你想做的。

重複其他符號。我的.emacs包括

(mapc (lambda (sym) (put sym 'scheme-indent-function 'defun)) 
     (list 'for 'for/list 'for/and 'for/or 
      'match 'case 'syntax-parse 'test-suite 'test-case 
      'define-syntax-rule 'match-let 'match-let*)) 

從我涉足PLT計劃的日子開始。