Oops, remove ALL "debugging printfs".

diff --git a/src/cref/butils.scm b/src/cref/butils.scm
index 0f644b5e3ede384cb01107efdfd8f89a56902968..e125a0e53545d12d41171845ce94458ba0fd8491 100644 (file)
--- a/src/cref/butils.scm
+++ b/src/cref/butils.scm
@@ -111,8 +111,6 @@ USA.
            (let ((target (->environment (car import)))
                  (source (->environment (cadr import)))
                  (names (cddr import)))
-             (for-each display (list";compile-system: linking: "
-                                    target" <- "source": "names"\n"))
              (for-each (lambda (name)
                         (environment-link-name target source name))
                       names)))