mirror of
https://github.com/open-simh/simh.git
synced 2026-01-14 15:46:31 +00:00
SCP: Add simulator binary name in a SIM_BIN_NAME environment variable
This commit is contained in:
parent
f2656acb38
commit
e158408268
4
scp.c
4
scp.c
@ -2006,8 +2006,12 @@ else if (*argv[0]) { /* sim name arg? */
|
||||
if (np == NULL)
|
||||
np = strrchr (nbuf, ']'); /* VMS path separator */
|
||||
if (np != NULL) {
|
||||
char *sim_bin_name = np; /* Save name pointer */
|
||||
|
||||
*np = '"';
|
||||
stat = do_cmd (-1, np) & ~SCPE_NOMESSAGE; /* proc default cmd file */
|
||||
np[strlen (np) - 4] = '\0'; /* strip .ini" */
|
||||
setenv ("SIM_BIN_NAME", sim_bin_name+1, 1); /* Publish simulator binary name */
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user