diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 165fa2590..251fedaa4 100644
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -4152,13 +4152,13 @@ but it fails to load."
                      (module-name module)
                      (module-name int2)
                      name)
-             (module-local-variable int2 name))))
+             (module-variable int2 name))))
 
     (define (first module name int1 val1 int2 val2 var val)
-      (or var (module-local-variable int1 name)))
+      (or var (module-variable int1 name)))
 
     (define (last module name int1 val1 int2 val2 var val)
-      (module-local-variable int2 name))
+      (module-variable int2 name))
 
     (define (noop module name int1 val1 int2 val2 var val)
       #f)