Author: wmb Date: 2008-01-25 00:25:58 +0100 (Fri, 25 Jan 2008) New Revision: 790
Modified: cpu/x86/disassem.fth Log: x86 disassembler - fixed formatting bug with [reg+offset] for negative offsets.
Modified: cpu/x86/disassem.fth =================================================================== --- cpu/x86/disassem.fth 2008-01-24 09:50:52 UTC (rev 789) +++ cpu/x86/disassem.fth 2008-01-24 23:25:58 UTC (rev 790) @@ -56,12 +56,16 @@ : ?+ ( -- ) ea-text c@ 1 > if " +" $add-text then ; +: ?- ( -- ) + ea-text c@ 1 > if " -" $add-text then +; : get-disp ( mod -- adr len ) case 0 of " " exit endof - 1 of op8@ bext dup 0>= if ?+ then endof - 2 of ?+ adv@ wext endof + 1 of op8@ bext endof + 2 of adv@ wext endof endcase + dup 0>= if ?+ else ?- negate then (u.) disp-buf pack count ; \ Used when "w" field contains 0