mirror of
https://github.com/PDP-10/klh10.git
synced 2026-01-11 23:52:54 +00:00
Add really-quit command which quits without questions asked.
This commit is contained in:
parent
b48544ebc6
commit
80eee8f112
11
src/klh10.c
11
src/klh10.c
@ -239,6 +239,8 @@ CMDDEF(cd_help, fc_help, CMRF_TOKS, NULL,
|
||||
"Basic help", "")
|
||||
CMDDEF(cd_quit, fc_quit, CMRF_NOARG, NULL,
|
||||
"Quit emulator", "")
|
||||
CMDDEF(cd_rquit, fc_rquit, CMRF_NOARG, NULL,
|
||||
"Really quit!", "")
|
||||
CMDDEF(cd_load, fc_load, CMRF_TOKS, "<file>",
|
||||
"Load binary into KN10", "")
|
||||
CMDDEF(cd_dump, fc_dump, CMRF_TOKS, "<file>",
|
||||
@ -330,6 +332,7 @@ KEYSBEGIN(fectbkeys)
|
||||
KEYDEF("help", cd_help)
|
||||
KEYDEF("exit", cd_quit)
|
||||
KEYDEF("quit", cd_quit)
|
||||
KEYDEF("really-quit", cd_rquit)
|
||||
KEYDEF("load", cd_load)
|
||||
KEYDEF("dump", cd_dump)
|
||||
KEYDEF("go", cd_go)
|
||||
@ -607,6 +610,14 @@ fc_quit(struct cmd_s *cm)
|
||||
os_exit(0);
|
||||
}
|
||||
|
||||
void
|
||||
fc_rquit(struct cmd_s *cm)
|
||||
{
|
||||
dev_term();
|
||||
mem_term();
|
||||
os_exit(0);
|
||||
}
|
||||
|
||||
/* FE_SHUTDOWN - Attempt to bring down PDP-10 OS and quit emulator as
|
||||
** gracefully as possible *without* any user interaction.
|
||||
**
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user