From 76f53dfec81f5f7cc14ce1bf1997437b837b227e Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Sat, 3 Nov 1990 18:17:01 +0000
Subject: [PATCH] Set the logical name vm: instead of mips:, 'cause that's what
 loadcom expects now.  Include both the generic and specific dirs in vm: and
 assem:.

---
 tools/worldload.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index d12ed76ea..1432f988e 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -16,8 +16,8 @@
 ;;;
 (setf (ext:search-list "code:") '("lisp:code/"))
 (setf (ext:search-list "c:") '("lisp:compiler/"))
-(setf (ext:search-list "mips:") '("c:mips/"))
-(setf (ext:search-list "assem:") '("lisp:assembly/"))
+(setf (ext:search-list "vm:") '("c:mips/" "c:generic/"))
+(setf (ext:search-list "assem:") '("lisp:assembly/mips/" "lisp:assembly/"))
 (setf (ext:search-list "hem:") '("lisp:hemlock/"))
 (setf (ext:search-list "clx:") '("lisp:clx/"))
 (setf (ext:search-list "pcl:") '("lisp:pcl/"))
-- 
GitLab