mirror of
https://github.com/simh/simh.git
synced 2026-04-25 03:34:34 +00:00
SCP: Activate internal unit tests at appropriate time
before processing default and command line scripts
This commit is contained in:
7
scp.c
7
scp.c
@@ -2619,6 +2619,10 @@ if (*argv[0]) { /* sim name arg? */
|
|||||||
setenv ("SIM_BIN_PATH", argv[0], 1);
|
setenv ("SIM_BIN_PATH", argv[0], 1);
|
||||||
}
|
}
|
||||||
sim_argv = argv;
|
sim_argv = argv;
|
||||||
|
|
||||||
|
if (sim_switches & SWMASK ('T')) /* Command Line -T switch */
|
||||||
|
stat = sim_library_unit_tests (); /* run library unit tests */
|
||||||
|
|
||||||
cptr = getenv("HOME");
|
cptr = getenv("HOME");
|
||||||
if (cptr == NULL) {
|
if (cptr == NULL) {
|
||||||
cptr = getenv("HOMEPATH");
|
cptr = getenv("HOMEPATH");
|
||||||
@@ -2657,9 +2661,6 @@ else if (*argv[0]) { /* sim name arg? */
|
|||||||
if (SCPE_BARE_STATUS(stat) == SCPE_OPENERR) /* didn't exist/can't open? */
|
if (SCPE_BARE_STATUS(stat) == SCPE_OPENERR) /* didn't exist/can't open? */
|
||||||
stat = SCPE_OK;
|
stat = SCPE_OK;
|
||||||
|
|
||||||
if (sim_switches & SWMASK ('T')) /* Command Line -T switch */
|
|
||||||
stat = sim_library_unit_tests (); /* run library unit tests */
|
|
||||||
|
|
||||||
if (SCPE_BARE_STATUS(stat) != SCPE_EXIT)
|
if (SCPE_BARE_STATUS(stat) != SCPE_EXIT)
|
||||||
process_stdin_commands (SCPE_BARE_STATUS(stat), argv);
|
process_stdin_commands (SCPE_BARE_STATUS(stat), argv);
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user