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)