Omit unreferenced variable in COMPILE-SYSTEM.

diff --git a/src/cref/butils.scm b/src/cref/butils.scm
index 5110da15139d594c9063e47a1189a463ffbea682..e11dce813064eb99dc14e523e4d3ad1834ff3712 100644 (file)
--- a/src/cref/butils.scm
+++ b/src/cref/butils.scm
@@ -49,7 +49,6 @@ USA.
     (lambda ()
       (let* ((os-type microcode-id/operating-system)
             (pmodel (read-package-model name os-type))
-            (pathname (pmodel/pathname pmodel))
             (dependencies (find-option 'dependencies options '())))
 
        (declare (integrate-operator file-package))