From 1d3968664fc843dad9dc1800f1280fc62b5b4278 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Tue, 24 Feb 2015 13:23:48 -0500
Subject: [PATCH] Delimit defprimitive section

---
 cgen.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cgen.scm b/cgen.scm
index 2cf38d76..8ce686af 100644
--- a/cgen.scm
+++ b/cgen.scm
@@ -1058,6 +1058,7 @@
     (close-output-port fp)))
 
 (define (autogen:defprimitives fp)
+  (display "/* This section is auto-generated via --autogen */\n" fp)
   (for-each
     (lambda (p)
       (display
@@ -1068,7 +1069,8 @@
           (symbol->string p)
           " */\n")
         fp))
-    *primitives*))
+    *primitives*)
+  (display "/* -------------------------------------------- */\n" fp))
 
 ;; List of primitive procedures
 (define (autogen:primitive-procedures fp)