diff --git a/eval.scm b/eval.scm index c761469d..126719ab 100644 --- a/eval.scm +++ b/eval.scm @@ -17,11 +17,6 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Expression handling helper functions -(define (tagged-list? tag exp) - (if (pair? exp) - (equal? (car exp) tag) - #f)) - (define (self-evaluating? exp) (cond ((number? exp) #t) ((boolean? exp) #t) diff --git a/scheme/eval.sld b/scheme/eval.sld index 460f94af..57539ad1 100644 --- a/scheme/eval.sld +++ b/scheme/eval.sld @@ -1,5 +1,6 @@ (define-library (scheme eval) (import + (scheme cyclone util) (scheme base) (scheme file) (scheme write)