From e22875eae3207589c8b2eeb334896d6d38240cfe Mon Sep 17 00:00:00 2001
From: Marius Vollmer <mvo@zagadka.de>
Date: Sat, 12 Jan 2002 19:16:49 +0000
Subject: [PATCH] (ice-9): Define 'eval' before exporting it.  This avoids a
 deprecation warning.

---
 ice-9/syncase.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/ice-9/syncase.scm b/ice-9/syncase.scm
index 36ea4f962..d24ad423e 100644
--- a/ice-9/syncase.scm
+++ b/ice-9/syncase.scm
@@ -52,7 +52,15 @@
 	   syntax-dispatch syntax-error bound-identifier=?
 	   datum->syntax-object free-identifier=?
 	   generate-temporaries identifier? syntax-object->datum
-	   void eval syncase))
+	   void syncase))
+
+;; This is to avoid a deprecation warning about re-exporting eval.
+;; When the re-exporting behavior of export is removed, removed this
+;; code and include 'eval' in the export clause of define-module,
+;; above.
+
+(define eval #f)
+(export eval)