added support for syntax-case*

marcomaggi · Sep 2, 2017 · d7ac257 · d7ac257
1 parent 58def48
commit d7ac257
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/src/chezscheme-lists-of-symbols.el b/src/chezscheme-lists-of-symbols.el
@@ -4,7 +4,7 @@
 
 ;; Author: Marco Maggi <marco.maggi-ipsu@poste.it>
 ;; Created: Tue Dec 10, 2013
-;; Time-stamp: <2017-09-01 07:50:58 marco>
+;; Time-stamp: <2017-09-02 07:28:53 marco>
 ;; Keywords: convenience, data, languages
 
 ;; This file is part of MMUX Home Directory.
@@ -845,6 +845,8 @@ language built ins.")
     ;; "define-inline" "define-constant"
     ;; "define-values" "define-constant-values"
 
+    "syntax-case*"
+
     "case-lambda/std" "case-lambda/typed" "case-lambda/checked"
     "named-lambda" "named-lambda/std" "named-lambda/typed" "named-lambda/checked"
     "named-case-lambda" "named-case-lambda/std" "named-case-lambda/typed" "named-case-lambda/checked"

diff --git a/src/chezscheme.el b/src/chezscheme.el
@@ -4,7 +4,7 @@
 
 ;; Author: Marco Maggi <marco.maggi-ipsu@poste.it>
 ;; Created: Tue Dec 10, 2013
-;; Time-stamp: <2017-09-01 07:51:20 marco>
+;; Time-stamp: <2017-09-02 07:28:39 marco>
 ;; Keywords: languages
 
 ;; This file is part of Chez Scheme Mode.
@@ -712,6 +712,7 @@ in the Scheme mode hook."
     (receive/checked					. 2)
     (returnable						. 0)
     (record-type-printer-set!				. 1)
+    (syntax-case*					. 2)
     (constructor					. 1)
     (constructor-signature				. 0)
     (destructor						. 1)