From 12291423c7ddbd636155aaf080f7da16501690d5 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 14 Feb 2019 17:14:18 -0500 Subject: [PATCH] Syntax fix --- cyclone.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cyclone.scm b/cyclone.scm index 1cc1d04c..cedf7677 100644 --- a/cyclone.scm +++ b/cyclone.scm @@ -442,7 +442,7 @@ (define (inject-globals! lis) ;; TODO: done here as proof-of-concept - (when (not (member globals 'Cyc-memoize)) + (when (not (member 'Cyc-memoize globals)) (set! globals (append globals '(Cyc-memoize))) (set! imported-vars (cons (lib:list->import-set '(Cyc-memoize srfi 69)) imported-vars)) )