mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

Add some new scheme features (tiny change)

Browse source 
* lisp/progmodes/scheme.el (scheme-font-lock-keywords-2):
Add export, import, library. 
(library): Set indent function.

Fixes: debbugs:9164
This commit is contained in:
Simen Heggestøyl 2013-06-14 17:37:49 -07:00 • committed by Glenn Morris
parent 230dcbaf2f
commit 12e5e86e89
2 changed files with 13 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2013-06-15 Simen Heggestøyl <simenheg@ifi.uio.no> (tiny change)
* progmodes/scheme.el (scheme-font-lock-keywords-2):
Add export, import, library. (Bug#9164)
(library): Set indent function.
2013-06-14 Glenn Morris <rgm@gnu.org>
* term/xterm.el (xterm--query):

7
lisp/progmodes/scheme.el
View file

@ -312,6 +312,8 @@ See `run-hooks'."
"call-with-input-file" "call-with-output-file" "case" "cond"
"do" "else" "for-each" "if" "lambda" "λ"
"let" "let*" "let-syntax" "letrec" "letrec-syntax"
;; R6RS library subforms.
"export" "import"
;; SRFI 11 usage comes up often enough.
"let-values" "let*-values"
;; Hannes Haug <hannes.haug@student.uni-tuebingen.de> wants:
@ -330,6 +332,10 @@ See `run-hooks'."
;;
;; Scheme `:' and `#:' keywords as builtins.
'("\\<#?:\\sw+\\>" . font-lock-builtin-face)
;; R6RS library declarations.
'("(\\(\\<library\\>\\)\\s-*(?\\(\\sw+\\)?"
(1 font-lock-keyword-face)
(2 font-lock-type-face))
)))
"Gaudy expressions to highlight in Scheme modes.")
@ -536,6 +542,7 @@ indentation."
(put 'letrec-syntax 'scheme-indent-function 1)
(put 'syntax-rules 'scheme-indent-function 1)
(put 'syntax-case 'scheme-indent-function 2) ; not r5rs
(put 'library 'scheme-indent-function 1) ; R6RS
(put 'call-with-input-file 'scheme-indent-function 1)
(put 'with-input-from-file 'scheme-indent-function 1)