Stub out execute until return
This commit is contained in:
parent
836e10bd5a
commit
73411e24a0
1 changed files with 15 additions and 0 deletions
15
commands.lua
15
commands.lua
|
@ -188,6 +188,19 @@ return function(server)
|
||||||
me.monitorClosed()
|
me.monitorClosed()
|
||||||
end
|
end
|
||||||
|
|
||||||
|
-- FIXME This should take instruction level into account
|
||||||
|
local function processExecuteUntilReturn(command)
|
||||||
|
-- FIXME
|
||||||
|
server.stepping = true
|
||||||
|
emu.execute(1, emu.executeCountType.cpuInstructions)
|
||||||
|
|
||||||
|
server.running = true
|
||||||
|
|
||||||
|
server.response(server.responseType.EXECUTE_UNTIL_RETURN, server.errorType.OK, command.requestId, nil)
|
||||||
|
|
||||||
|
me.monitorClosed()
|
||||||
|
end
|
||||||
|
|
||||||
local function processPing(command)
|
local function processPing(command)
|
||||||
server.response(server.responseType.PING, server.errorType.OK, command.requestId, nil)
|
server.response(server.responseType.PING, server.errorType.OK, command.requestId, nil)
|
||||||
end
|
end
|
||||||
|
@ -839,6 +852,8 @@ return function(server)
|
||||||
|
|
||||||
elseif ct == server.commandType.ADVANCE_INSTRUCTIONS then
|
elseif ct == server.commandType.ADVANCE_INSTRUCTIONS then
|
||||||
processAdvanceInstructions(command)
|
processAdvanceInstructions(command)
|
||||||
|
elseif ct == server.commandType.EXECUTE_UNTIL_RETURN then
|
||||||
|
processExecuteUntilReturn(command)
|
||||||
|
|
||||||
elseif ct == server.commandType.PING then
|
elseif ct == server.commandType.PING then
|
||||||
processPing(command)
|
processPing(command)
|
||||||
|
|
Loading…
Add table
Reference in a new issue