diff --git a/src/ikarus.boot b/src/ikarus.boot
index 97e4409..5dfe30d 100644
Binary files a/src/ikarus.boot and b/src/ikarus.boot differ
diff --git a/src/libcxr.ss b/src/libcxr.ss
index d2dada9..96b2c0c 100644
--- a/src/libcxr.ss
+++ b/src/libcxr.ss
@@ -3,8 +3,14 @@
 ;(primitive-set! 'cdr (lambda (x) (cdr x)))
 ;(primitive-set! 'cadr (lambda (x) (cadr x)))
 
-(let ([err (lambda (who x)
-             (error who "invalid list structure ~s" x))])
+(library (ikarus cxr)
+  (export)
+  (import (scheme))
+
+  (define err
+    (lambda (who x)
+      (error who "invalid list structure ~s" x)))
+
   (primitive-set!
     'car
     (lambda (orig)
diff --git a/src/makefile.ss b/src/makefile.ss
index b3256df..94ab39c 100755
--- a/src/makefile.ss
+++ b/src/makefile.ss
@@ -233,7 +233,7 @@
       ["libcontrol1.ss"   "libcontrol1.fasl"  p0 onepass]
       ["libcollect.ss"    "libcollect.fasl"   p0 onepass]
       ["librecord.ss"     "librecord.fasl"    p0 onepass]
-      ["libcxr.ss"        "libcxr.fasl"       p0 onepass]
+    ["libcxr.ss"        "libcxr.fasl"       p0 onepass]
       ["libnumerics.ss"   "libnumerics.fasl"  p0 onepass]
     ["libguardians.ss"  "libguardians.fasl" p0 onepass]
     ["libcore.ss"       "libcore.fasl"      p0 onepass]