mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-24 23:56:49 +03:00
* fix F8 after commands with args, broken in r3675
* fix autoscroll of disassembler window, broken in r4908 git-svn-id: svn://kolibrios.org@5206 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
0025f294e3
commit
7e04b7813d
@ -1702,7 +1702,7 @@ draw_disasm:
|
||||
; TODO: cleanup of this function, make some global labels local
|
||||
update_disasm_eip:
|
||||
; test if instruction at eip is showed
|
||||
mov ecx, [disasm_height_dd+4]
|
||||
mov ecx, [disasm_height_dd]
|
||||
mov eax, [disasm_start_pos]
|
||||
mov [disasm_cur_pos], eax
|
||||
|
||||
|
@ -995,25 +995,33 @@ OnStep:
|
||||
|
||||
;-----------------------------------------------------------------------------
|
||||
; Proceed process event
|
||||
;Here we get [<number>] argument at do step <number> times
|
||||
OnProceedMultiple:
|
||||
cmp [bSuspended], 0
|
||||
jz OnStep.running
|
||||
mov [proc_num], 1
|
||||
mov esi, [curarg]
|
||||
test esi, esi
|
||||
jz .do
|
||||
cmp byte [esi], 0
|
||||
jz .do
|
||||
call get_hex_number
|
||||
jc .ret
|
||||
cmp eax, 0 ; check if lesser or equal than 0
|
||||
jle .ret
|
||||
mov [proc_num], eax
|
||||
mov [curarg], 0
|
||||
.do:
|
||||
call OnProceed
|
||||
dec [proc_num]
|
||||
jnz .do
|
||||
.ret:
|
||||
ret
|
||||
|
||||
|
||||
OnProceed:
|
||||
cmp [bSuspended], 0
|
||||
jz OnStep.running
|
||||
cmp [proc_num], 0
|
||||
jg .procone
|
||||
mov esi, [curarg]
|
||||
cmp esi, 0
|
||||
jz .procone
|
||||
cmp byte [esi], 0
|
||||
jz .procone
|
||||
call get_hex_number
|
||||
jc .ret
|
||||
cmp eax, 0 ; check if lesser than 0
|
||||
jle .ret
|
||||
mov [proc_num], eax
|
||||
mov [curarg], 0
|
||||
|
||||
.procone:
|
||||
mov esi, [_eip]
|
||||
|
||||
@@:
|
||||
@ -1107,15 +1115,6 @@ OnProceed:
|
||||
jmp OnStep.doit
|
||||
|
||||
@@:
|
||||
mov eax, [proc_num]
|
||||
dec eax
|
||||
cmp eax, 0
|
||||
jle .ret
|
||||
mov [proc_num], eax
|
||||
jmp .procone
|
||||
|
||||
.ret:
|
||||
mov [proc_num], 0
|
||||
ret
|
||||
|
||||
;-----------------------------------------------------------------------------
|
||||
@ -2000,7 +1999,7 @@ commands:
|
||||
db 0Bh
|
||||
dd aStep, OnStepMultiple, StepSyntax, StepHelp
|
||||
db 0Bh
|
||||
dd aProceed, OnProceed, ProceedSyntax, ProceedHelp
|
||||
dd aProceed, OnProceedMultiple, ProceedSyntax, ProceedHelp
|
||||
db 0Bh
|
||||
dd aCalc, OnCalc, CalcSyntax, CalcHelp
|
||||
db 0Eh
|
||||
|
Loading…
Reference in New Issue
Block a user