Little source cleanup

This commit is contained in:
grinvader
2005-09-15 00:12:00 +00:00
parent 462f6af63a
commit 94ed60af40

View File

@@ -451,63 +451,17 @@ NEWSYM RSPCRegF2
NEWSYM RSPCRegF3 NEWSYM RSPCRegF3
mov al,[SPCRAM+0f3h] mov al,[SPCRAM+0f3h]
ret ret
%ifdef SPCDUMP
SECTION .bss
ALIGNB 4
NEWSYM SPCSave_start, resd 2
NEWSYM SPCSave_buffer, resb 4
NEWSYM SPCSave_ports, resb 4
SECTION .text
EXTSYM SPCSave_dump, SPCSave_handle, Write_File
%macro spcdump 1
cmp byte[SPCSave_dump], 1
jne %%nodump
inc dword[SPCSave_buffer]
cmp [SPCSave_ports+%1], al
je %%nodump
mov [SPCSave_ports+%1], al
pushad
mov byte[SPCSave_buffer+2], %1
mov [SPCSave_buffer+3], al
mov ebx, [SPCSave_handle]
mov ecx, 4
mov edx, SPCSave_buffer
call Write_File
xor eax, eax
mov [SPCSave_buffer], eax
popad
%%nodump
%endmacro
%endif
NEWSYM RSPCRegF4 NEWSYM RSPCRegF4
mov al,[SPCRAM+0f4h] mov al,[SPCRAM+0f4h]
%ifdef SPCDUMP
spcdump 0
%endif
ret ret
NEWSYM RSPCRegF5 NEWSYM RSPCRegF5
mov al,[SPCRAM+0f5h] mov al,[SPCRAM+0f5h]
%ifdef SPCDUMP
spcdump 1
%endif
ret ret
NEWSYM RSPCRegF6 NEWSYM RSPCRegF6
mov al,[SPCRAM+0f6h] mov al,[SPCRAM+0f6h]
%ifdef SPCDUMP
spcdump 2
%endif
ret ret
NEWSYM RSPCRegF7 NEWSYM RSPCRegF7
mov al,[SPCRAM+0f7h] mov al,[SPCRAM+0f7h]
%ifdef SPCDUMP
spcdump 3
%endif
ret ret
NEWSYM RSPCRegF8 NEWSYM RSPCRegF8
mov al,0 ;[SPCRAM+0f8h] mov al,0 ;[SPCRAM+0f8h]
@@ -591,30 +545,6 @@ NEWSYM RSPCRegFF
ret ret
skipmacro 2 skipmacro 2
%if 0
NEWSYM spcnextskip
inc byte[spcnumread]
cmp byte[spcnumread],5
je near haltspc
ret
NEWSYM haltspc
cmp byte[SPC700sh],1
je .nochangestate
mov dword[cycpbl],0FFFFFFFFh
test byte[curexecstate],02h
jz .nochangestate
and byte[curexecstate],0FDh
push ebx
xor ebx,ebx
mov bl,dl
mov edi,[tableadb+ebx*4]
pop ebx
.nochangestate
mov byte[spcnumread],0
ret
%endif
SECTION .data SECTION .data
NEWSYM spcnumread, dd 0 NEWSYM spcnumread, dd 0
NEWSYM spchalted, dd 0 NEWSYM spchalted, dd 0
@@ -2725,7 +2655,6 @@ NEWSYM OpCF ; MUL YA YA(16 bits) <- Y * A N......Z.
;************************************************ ;************************************************
NEWSYM OpBE ; DAS A decimal adjust for sub N......ZC NEWSYM OpBE ; DAS A decimal adjust for sub N......ZC
; ret
; copy al flags into AH ; copy al flags into AH
xor ah,ah xor ah,ah
test byte[spcNZ],80h test byte[spcNZ],80h
@@ -2778,5 +2707,3 @@ NEWSYM OpDF ; DAA A decimal adjust for add N......ZC
NEWSYM Invalidopcode ; Invalid Opcode NEWSYM Invalidopcode ; Invalid Opcode
dec ebp dec ebp
ret ret