From 6f687816e306f92e760c81ade1bd872307a0a80c Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Fri, 10 Jul 2015 09:30:42 -0400
Subject: [PATCH] Export sysdef-immutable-system-search and
 sysdef-preloaded-system-search

---
 find-system.lisp | 3 ++-
 interface.lisp   | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/find-system.lisp b/find-system.lisp
index 1621dc9e7..04b63f467 100644
--- a/find-system.lisp
+++ b/find-system.lisp
@@ -18,7 +18,8 @@
    #:find-system-if-being-defined
    #:contrib-sysdef-search #:sysdef-find-asdf ;; backward compatibility symbols, functions removed
    #:sysdef-preloaded-system-search #:register-preloaded-system #:*preloaded-systems*
-   #:*defined-systems* #:clear-defined-systems #:*immutable-systems* #:register-immutable-system
+   #:sysdef-immutable-system-search #:register-immutable-system #:*immutable-systems*
+   #:*defined-systems* #:clear-defined-systems
    ;; defined in source-registry, but specially mentioned here:
    #:initialize-source-registry #:sysdef-source-registry-search))
 (in-package :asdf/find-system)
diff --git a/interface.lisp b/interface.lisp
index c13264cfa..573a83516 100644
--- a/interface.lisp
+++ b/interface.lisp
@@ -58,7 +58,8 @@
    #:static-file #:doc-file #:html-file
    #:file-type #:source-file-type
 
-   #:register-preloaded-system #:register-immutable-system
+   #:register-preloaded-system #:sysdef-preloaded-system-search
+   #:register-immutable-system #:sysdef-immutable-system-search
 
    #:package-inferred-system #:register-system-packages
    #:package-system ;; backward-compatibility during migration, to be removed in a further release.
-- 
GitLab