SpindleyQ/honeylisp
1
1
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fix multiple breakpoints at the same memory address

Browse source
This commit is contained in:
Jeremy Penner 2021-10-07 22:16:09 -04:00
parent 06ccd4a2b3
commit e8665e7c0a
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
link/mame.fnl
View file

@ -70,7 +70,7 @@
(var last-addr ?last-addr) (var last-addr ?last-addr)
(while (let [state manager.machine.debugger.execution_state (while (let [state manager.machine.debugger.execution_state
addr (. manager.machine.devices ::maincpu :state :PC :value)] addr (. manager.machine.devices ::maincpu :state :PC :value)]
(not (and (= state :stop) (not= addr ?last-addr)))) (not (and (= state :stop) (not= addr last-addr))))
(when (= :run manager.machine.debugger.execution_state) (when (= :run manager.machine.debugger.execution_state)
(set last-addr nil)) (set last-addr nil))
(coroutine.yield)))) (coroutine.yield))))