From cbd8bd8a0ad239a2156fc9b1c2c785461b6fa96c Mon Sep 17 00:00:00 2001
From: Mark Pizzolato <mark@infocomm.com>
Date: Tue, 16 Jul 2024 12:05:41 -1000
Subject: [PATCH] SCP : Log various initialization steps with DebugInit enabled

Removed previously added DEPOSIT ALL 0 in precalibrate routine.
That DEPOSIT was added to explicitly restore memory to 0's at simulator
startup, but the several second cost of executing that slowed down
startup of any simulator which had precalibration support.  Anyone who
explicitly cares to have zeroed memory on startup should include such a
command in their own simulator configuration.
---
 scp.c       | 3 +++
 sim_timer.c | 4 +++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/scp.c b/scp.c
index a7df22e7..d93c451f 100644
--- a/scp.c
+++ b/scp.c
@@ -3078,6 +3078,7 @@ if (*argv[0]) {                                         /* sim name arg? */
 sim_quiet = sim_switches & SWMASK ('Q');                /* -q means quiet */
 sim_on_inherit = sim_switches & SWMASK ('O');           /* -o means inherit on state */
 
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "Beginning SCP module initializations\n");
 sim_init_sock ();                                       /* init socket capabilities */
 AIO_INIT;                                               /* init Asynch I/O */
 sim_finit ();                                           /* init fio package */
@@ -3106,6 +3107,7 @@ if ((argc > 2) &&
     return EXIT_FAILURE;
     }
 
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "Merging External Environment variables overriding SCP commands\n");
 for (i = 0; cmd_table[i].name; i++) {
     size_t alias_len = strlen (cmd_table[i].name);
     char *cmd_name = (char *)calloc (1 + alias_len, sizeof (*cmd_name));
@@ -13212,6 +13214,7 @@ t_stat sim_brk_init (void)
 {
 int32 i;
 
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "sim_brk_init()\n");
 for (i=0; i<sim_brk_lnt; i++) {
     BRKTAB *bp = sim_brk_tab[i];
 
diff --git a/sim_timer.c b/sim_timer.c
index c631b9d2..0bbcb2e6 100644
--- a/sim_timer.c
+++ b/sim_timer.c
@@ -3759,6 +3759,7 @@ UNIT precalib_unit = { UDATA (&sim_timer_stop_svc, 0, 0) };
 
 if (cmd == NULL)
     return;
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "Starting sim_timer_precalibrate_execution_rate()\n");
 sim_run_boot_prep (RU_GO);
 while (sim_clock_queue != QUEUE_LIST_END)
     sim_cancel (sim_clock_queue);
@@ -3790,7 +3791,8 @@ for (tmr=0; tmr<=SIM_NTIMERS; tmr++) {
     }
 sim_inst_per_sec_last = sim_precalibrate_ips;
 sim_idle_stable = 0;
-exdep_cmd (EX_D, "ALL 0");      /* Leave memory in its initial state */
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "Precalibration Rate: %s %s Per Sec\n", sim_fmt_numeric (sim_inst_per_sec_last), sim_vm_interval_units);
+sim_debug (SIM_DBG_INIT, &sim_scp_dev, "Done sim_timer_precalibrate_execution_rate()\n");
 }
 
 double