start to modify scheme's `syntax' binding

collects/honu/main.rkt

@@ -46,6 +46,7 @@
            (honu-macro-item macroItem)
            (honu-macro macro)
            (honu-syntax syntax)
+           (scheme-syntax schemeSyntax)
            ))
 
 #;

collects/honu/private/parse.rkt

@@ -225,7 +225,7 @@
   (when (and (stx-pair? stx) (equal? 'syntax (syntax->datum (stx-car stx))))
     (printf "syntax == honu-syntax? ~a\n" (free-identifier=? (stx-car stx) #'honu-syntax)))
   |#
-  (syntax-parse stx #:literals (honu-syntax #%parens syntax)
+  (syntax-parse stx #:literals (honu-syntax #%parens scheme-syntax)
     [((honu-syntax (#%parens x ...) y ...) rest ...)
      (with-syntax ([(y* ...) (fix-output #'(y ... rest ...))])
        (syntax/loc stx