Solve a name clash.

Add something to help debugging.

sys/boot/forth/loader.4th

@@ -66,26 +66,26 @@ only forth also support-functions also builtins definitions
       0 1 unload drop
     else
       s" kernelname" getenv? 0= if ( no kernel has been loaded )
-	load_conf
+	load_kernel_and_modules
 	?dup if exit then
       then
       1 boot exit
     then
   else
     s" kernelname" getenv? 0= if ( no kernel has been loaded )
-      load_conf
+      load_kernel_and_modules
       ?dup if exit then
     then
     1 boot exit
   then
-  load_conf
+  load_kernel_and_modules
   ?dup 0= if 0 1 boot then
 ;
 
 : boot-conf
   0= if ( interpreted ) get-arguments then
   0 1 unload drop
-  load_conf
+  load_kernel_and_modules
   ?dup 0= if 0 1 autoboot then
 ;
 

sys/boot/forth/support.4th

@@ -1286,7 +1286,13 @@ also builtins
   begin
     parse-; 2>r
     2over 2r>
-    r@ clip_args 1 load
+    r@ clip_args
+    s" DEBUG" getenv? if
+      s" echo Module_path: ${module_path}" evaluate
+      ." Kernel     : " >r 2dup type r> cr
+      dup 2 = if ." Flags      : " >r 2over type r> cr then
+    then
+    1 load
   while
     dup 0=
   until
@@ -1595,7 +1601,7 @@ also builtins
   drop ( empty string )
 ;
 
-: load_conf  ( args -- flag )
+: load_kernel_and_modules  ( args -- flag )
   set-tempoptions
   argc >r
   s" temp_options" getenv dup -1 <> if