diff --git a/asdf.asd b/asdf.asd
index ba0f23e3c68d31a9ae19c5073f37b28460cbe401..a84d9dbd273b5336dda22ad79ffed1d4e4b34c9d 100644
--- a/asdf.asd
+++ b/asdf.asd
@@ -14,7 +14,7 @@
   :licence "MIT"
   :description "Another System Definition Facility"
   :long-description "ASDF builds Common Lisp software organized into defined systems."
-  :version "2.26.69" ;; to be automatically updated by bin/bump-revision
+  :version "2.26.70" ;; to be automatically updated by bin/bump-revision
   :depends-on ()
   :components
   ((:file "asdf")))
diff --git a/header.lisp b/header.lisp
index e55e325e45bfdf706a281dfe45461faad54f1ddf..8b96421960ce874d43a0262dd34551ab6f8a3221 100644
--- a/header.lisp
+++ b/header.lisp
@@ -1,5 +1,5 @@
 ;; -*- mode: Common-Lisp; Base: 10 ; Syntax: ANSI-Common-Lisp ; coding: utf-8 -*-
-;;; This is ASDF 2.26.69: Another System Definition Facility.
+;;; This is ASDF 2.26.70: Another System Definition Facility.
 ;;;
 ;;; Feedback, bug reports, and patches are all welcome:
 ;;; please mail to <asdf-devel@common-lisp.net>.
diff --git a/lisp-action.lisp b/lisp-action.lisp
index 73e97428d1e038e9ec19e590f0b48f838199e4d3..fc15a5627d98a089cb77b8d631ded0b35c2ab616 100644
--- a/lisp-action.lisp
+++ b/lisp-action.lisp
@@ -4,7 +4,7 @@
 (asdf/package:define-package :asdf/lisp-action
   (:recycle :asdf/lisp-action :asdf)
   (:intern #:proclamations #:flags)
-  (:use :common-lisp :asdf/utility :asdf/lisp-build
+  (:use :common-lisp :asdf/implementation :asdf/utility :asdf/lisp-build
    :asdf/component :asdf/system :asdf/find-component :asdf/operation :asdf/action)
   (:export
    #:compile-error #:compile-failed #:compile-warned #:try-recompiling
diff --git a/lisp-build.lisp b/lisp-build.lisp
index 12d7a539719802933e1cdd9463f7cb9dbf6ced17..b93b19e3291ec5eaa3a62f5aefa2c9b1c92053e3 100644
--- a/lisp-build.lisp
+++ b/lisp-build.lisp
@@ -3,7 +3,7 @@
 
 (asdf/package:define-package :asdf/lisp-build
   (:recycle :asdf/lisp-build :asdf)
-  (:use :common-lisp :asdf/utility :asdf/pathname :asdf/os)
+  (:use :common-lisp :asdf/implementation :asdf/utility :asdf/pathname :asdf/os)
   (:fmakunbound #:compile-file*)
   (:export
    #:*compile-file-warnings-behaviour* #:*compile-file-failure-behaviour*
diff --git a/test/test-around-compile.script b/test/test-around-compile.script
index e6b93bedfb89b130f78784729ff5c4c27fde5428..885ac8a589708d91a598b9ab12c9768cf0999b6b 100644
--- a/test/test-around-compile.script
+++ b/test/test-around-compile.script
@@ -6,8 +6,6 @@
   (let ((*read-base* 2))
     (funcall thunk)))
 
-(trace call-in-base-2 compile-file load asdf::around-compile-hook)
-
 (quit-on-error
  (defsystem test-around-compile
    :around-compile call-in-base-2
diff --git a/upgrade.lisp b/upgrade.lisp
index 0c09862a846a9f09d4888470843855ce5492b309..c1fb63cbcd4e0f9d5519ef51255900fdd8e0547a 100644
--- a/upgrade.lisp
+++ b/upgrade.lisp
@@ -24,7 +24,7 @@
          ;; "2.345.6" would be a development version in the official upstream
          ;; "2.345.0.7" would be your seventh local modification of official release 2.345
          ;; "2.345.6.7" would be your seventh local modification of development version 2.345.6
-         (asdf-version "2.26.69")
+         (asdf-version "2.26.70")
          (existing-asdf (find-class (find-symbol* :component :asdf nil) nil))
          (existing-version *asdf-version*)
          (already-there (equal asdf-version existing-version)))