diff --git a/sex-mode.el b/sex-mode.el index 2f3803f..c574bf6 100644 --- a/sex-mode.el +++ b/sex-mode.el @@ -29,6 +29,7 @@ All commands in `lisp-mode-shared-map' are inherited by this map.") ;; Declarations (list (concat "(" (regexp-opt '("chicken-import" + "chicken-load" "extern" "include" "fn" diff --git a/sexc.scm b/sexc.scm index a735bbd..476142b 100644 --- a/sexc.scm +++ b/sexc.scm @@ -129,7 +129,8 @@ (case (car form) ((define) (eval form) acc) ((template) (eval form) acc) - ((load) (eval form) acc) + ((chicken-load) + (load (cadr form)) acc) ((chicken-import) (eval (cons 'import (cdr form))) acc) (else