Mercurial > emacs
changeset 92103:51d024394524
(scheme-font-lock-keywords-2): Add SRFI 11 support.
(let-values, let*-values): Specify scheme-indent-function.
| author | Thien-Thi Nguyen <ttn@gnuvola.org> |
|---|---|
| date | Fri, 22 Feb 2008 11:09:30 +0000 |
| parents | b77f340247f8 |
| children | 4a91cd877f7a |
| files | lisp/progmodes/scheme.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/scheme.el Fri Feb 22 11:03:26 2008 +0000 +++ b/lisp/progmodes/scheme.el Fri Feb 22 11:09:30 2008 +0000 @@ -334,6 +334,8 @@ "call-with-input-file" "call-with-output-file" "case" "cond" "do" "else" "for-each" "if" "lambda" "let" "let*" "let-syntax" "letrec" "letrec-syntax" + ;; SRFI 11 usage comes up often enough. + "let-values" "let*-values" ;; Hannes Haug <hannes.haug@student.uni-tuebingen.de> wants: "and" "or" "delay" "force" ;; Stefan Monnier <stefan.monnier@epfl.ch> says don't bother: @@ -541,6 +543,8 @@ (put 'let 'scheme-indent-function 'scheme-let-indent) (put 'let* 'scheme-indent-function 1) (put 'letrec 'scheme-indent-function 1) +(put 'let-values 'scheme-indent-function 1) ; SRFI 11 +(put 'let*-values 'scheme-indent-function 1) ; SRFI 11 (put 'sequence 'scheme-indent-function 0) ; SICP, not r4rs (put 'let-syntax 'scheme-indent-function 1) (put 'letrec-syntax 'scheme-indent-function 1)