Make internal paths configurable in the REPL.

Author: objecthub

Sources/LispKitTools/LispKitRepl.swift

@@ -211,14 +211,9 @@ open class LispKitRepl {
         return false
       }
     }
-    // Inject root directories if provided via a command-line argument
-    for root in self.roots.value {
-      guard self.setupBinaryBundle(root: URL(fileURLWithPath: root, isDirectory: true)) else {
-        return false
-      }
-    }
     // Set up remaining file paths
-    return self.setupPaths() &&
+    return self.setupRootPaths() &&
+           self.setupPaths() &&
            self.bootstrapContext() &&
            self.importLibraries(initialLibraries) &&
            self.loadPrelude()
@@ -237,6 +232,15 @@ open class LispKitRepl {
     return true
   }
 
+  open func setupRootPaths() -> Bool {
+    for root in self.roots.value {
+      guard self.setupBinaryBundle(root: URL(fileURLWithPath: root, isDirectory: true)) else {
+        return false
+      }
+    }
+    return true
+  }
+
   open func setupPaths() -> Bool {
     if let context = self.context {
       for p in self.filePaths.value {