File 3431-Extend-init_debug-to-print-module-loading-... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 3431-Extend-init_debug-to-print-module-loading-commands.patch of Package erlang (Revision 9deafeb64e59c8b1cbd25b12c803e3c0)

Currently displaying revision 9deafeb64e59c8b1cbd25b12c803e3c0 , Show latest

From caab58bafb1828073ee9656677769c98c46ad25b Mon Sep 17 00:00:00 2001
From: Christian Flicker <70640214+cflicker@users.noreply.github.com>
Date: Sat, 6 Jan 2024 12:17:22 +0100
Subject: [PATCH 1/2] Extend -init_debug to print module loading commands

---
 erts/preloaded/src/init.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/erts/preloaded/src/init.erl b/erts/preloaded/src/init.erl
index a8bff9d252..885cd02e76 100644
--- a/erts/preloaded/src/init.erl
+++ b/erts/preloaded/src/init.erl
@@ -1008,11 +1008,11 @@ eval_script([{kernel_load_completed}|T], #es{load_mode=Mode}=Es0) ->
 	     _ -> Es0#es{prim_load=false}
 	 end,
     eval_script(T, Es);
-eval_script([{primLoad,Mods}|T], #es{init=Init,prim_load=PrimLoad}=Es)
+eval_script([{primLoad,Mods}|T], #es{init=Init,prim_load=PrimLoad,debug=Deb}=Es)
   when is_list(Mods) ->
     case PrimLoad of
 	true ->
-	    load_modules(Mods, Init);
+	    debug(Deb, {primLoad,Mods}, fun() -> load_modules(Mods, Init) end);
 	false ->
 	    %% Do not load now, code_server does that dynamically!
 	    ok
-- 
2.35.3

Places

File 3431-Extend-init_debug-to-print-module-loading-commands.patch of Package erlang (Revision 9deafeb64e59c8b1cbd25b12c803e3c0)

Places