Debugger: Support old AppleWin GO cmd

This commit is contained in:
tomch 2009-12-12 12:33:45 +00:00
parent fa6ceead06
commit 2b31065e93

View File

@ -7041,15 +7041,31 @@ Update_t ExecuteCommand (int nArgs)
{ {
WORD nAddress = 0; WORD nAddress = 0;
// Support Apple Monitor commands // Support old AppleWin GO commands:
// ####G -> JMP $adress // . G -> GO
// . G #### -> GO until $address
// Support Apple Monitor commands:
// . ####G -> JMP $address (exit debugger)
if ((pCommand[nLen-1] == 'G') || if ((pCommand[nLen-1] == 'G') ||
(pCommand[nLen-1] == 'g')) (pCommand[nLen-1] == 'g'))
{ {
pCommand[nLen-1] = 0; if (nLen == 1)
ArgsGetValue( pArg, & nAddress ); {
if (nArgs)
{
const int iArg = 1;
ArgsGetValue( &g_aArgs[iArg], &g_aArgs[iArg].nValue );
_CmdBreakpointAddCommonArg(iArg, nArgs, BP_SRC_REG_PC, BP_OP_EQUAL); // TC-TODO: Clear this temp BP when it's hit or stepping is cancelled
}
}
else if (nLen > 1)
{
pCommand[nLen-1] = 0;
ArgsGetValue( pArg, & nAddress );
regs.pc = nAddress;
}
regs.pc = nAddress;
g_nAppMode = MODE_RUNNING; // exit the debugger g_nAppMode = MODE_RUNNING; // exit the debugger
nFound = 1; nFound = 1;