summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlex Kost <alezost@gmail.com>2015-10-03 16:45:43 +0300
committerAlex Kost <alezost@gmail.com>2015-10-03 16:45:43 +0300
commitf65b3b1df4f7e6f6e281272ac61262444e59979e (patch)
tree994b5b656d83823538721da18e15adc84b074099
parent3cef425f712f16fb4d2352c6e81664c3bda1e231 (diff)
downloadgeiser-chez-f65b3b1df4f7e6f6e281272ac61262444e59979e.tar.gz
geiser-chez-f65b3b1df4f7e6f6e281272ac61262444e59979e.tar.bz2
Add more highlighting/indentation for Guile
-rw-r--r--elisp/geiser-guile.el15
1 files changed, 12 insertions, 3 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index 699ed9a..e70ca30 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -247,14 +247,19 @@ This function uses `geiser-guile-init-file' if it exists."
(defconst geiser-guile--builtin-keywords
'("call-with-input-file"
- "call-with-output-file"
"call-with-input-string"
+ "call-with-output-file"
"call-with-output-string"
+ "call-with-prompt"
+ "call-with-trace"
"define-accessor"
"define-class"
"define-enumeration"
"define-inlinable"
+ "define-syntax-parameter"
+ "eval-when"
"lambda*"
+ "syntax-parameterize"
"use-modules"
"with-error-to-file"
"with-error-to-port"
@@ -283,9 +288,13 @@ This function uses `geiser-guile-init-file' if it exists."
(c-lambda 2)
(call-with-input-string 1)
(call-with-output-string 0)
+ (call-with-prompt 1)
+ (call-with-trace 0)
+ (eval-when 1)
(lambda* 1)
(pmatch defun)
(sigaction 1)
+ (syntax-parameterize 1)
(with-error-to-file 1)
(with-error-to-port 1)
(with-error-to-string 0)
@@ -295,8 +304,8 @@ This function uses `geiser-guile-init-file' if it exists."
(with-input-from-string 1)
(with-method 1)
(with-mutex 1)
- (with-output-to-string 0))
-
+ (with-output-to-string 0)
+ (with-throw-handler 1))
;;; Compilation shell regexps