diff --git a/libs/library-util.scm b/libs/library-util.scm index c403c42..3e2d44d 100644 --- a/libs/library-util.scm +++ b/libs/library-util.scm @@ -41,7 +41,9 @@ (lambda (result implementation rest) (cond ((null? rest) result) ((equal? (car rest) 'import) (cdr rest)) - ((member 'cond-expand (car rest)) + ((or (member 'cond-expand (car rest)) + (member 'prefix (car rest)) + (member 'except (car rest))) (if (assoc implementation (cdr (car rest))) (get-imports result implementation