From 27822cee2a176dfe24b2af5867ca4b9470d8a30b Mon Sep 17 00:00:00 2001
From: alex-eg <>
Date: Sat, 14 Jun 2025 18:09:50 +0300
Subject: [PATCH] prefix define and define-syntax with chicken-

as we have define in cpp
---
 sex-mode.el | 5 +++--
 sexc.scm    | 2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/sex-mode.el b/sex-mode.el
index 7a5932a..1e8d9e1 100644
--- a/sex-mode.el
+++ b/sex-mode.el
@@ -28,10 +28,11 @@ All commands in `lisp-mode-shared-map' are inherited by this map.")
     (list
      ;; Declarations
      (list (concat "("
-                   (regexp-opt '("chicken-import"
+                   (regexp-opt '("chicken-define"
+                                 "chicken-define-syntax"
+                                 "chicken-import"
                                  "chicken-load"
                                  "define"
-                                 "define-syntax"
                                  "extern"
                                  "include"
                                  "fn"
diff --git a/sexc.scm b/sexc.scm
index 3787dfb..39076fc 100644
--- a/sexc.scm
+++ b/sexc.scm
@@ -140,7 +140,7 @@
 
 (define (process-form form acc)
   (case (car form)
-    ((define) (eval form) acc)
+    ((chicken-define) (eval form) acc)
     ((template) (eval form) acc)
     ((chicken-load)
      (load (cadr form)) acc)