diff --git a/srfi/1.sld b/srfi/1.sld
index a90766d4..e5950c3a 100644
--- a/srfi/1.sld
+++ b/srfi/1.sld
@@ -7,7 +7,8 @@
 ;;;; This module is an interface to the list library.
 ;;;;
 (define-library (srfi 1)
-  (import (scheme base))
+  (import (scheme base)
+          (scheme cxr))
   (export
     xcons tree-copy make-list list-tabulate cons* list-copy 
     proper-list? circular-list? dotted-list? not-pair? null-list? list=