empathicqubit/cc65
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

remove TABs

Browse source
This commit is contained in:
Christian Groessler 2019-02-05 23:27:52 +01:00
parent 2190703a57
commit 58484449b4
21 changed files with 164 additions and 169 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
asminc/smc.inc
View file

@ -63,7 +63,7 @@ _SMCDesignator: statement
ldy #opcode
sty _SMCDesignator
.else
.error "Invalid usage of macro 'SMC_TransferOpcode'"
.error "Invalid usage of macro 'SMC_TransferOpcode'"
.endif
.endmacro
@ -75,7 +75,7 @@ _SMCDesignator: statement
.elseif .match ({register}, y)
ldy _SMCDesignator
.else
.error "Invalid usage of macro 'SMC_LoadOpcode'"
.error "Invalid usage of macro 'SMC_LoadOpcode'"
.endif
.endmacro
@ -87,7 +87,7 @@ _SMCDesignator: statement
.elseif .match ({register}, y)
sty _SMCDesignator
.else
.error "Invalid usage of macro 'SMC_StoreOpcode'"
.error "Invalid usage of macro 'SMC_StoreOpcode'"
.endif
.endmacro
@ -102,7 +102,7 @@ _SMCDesignator: statement
ldy #(<(destination - _SMCDesignator - 2))
sty _SMCDesignator+1
.else
.error "Invalid usage of macro 'SMC_ChangeBranch'"
.error "Invalid usage of macro 'SMC_ChangeBranch'"
.endif
.endmacro
@ -117,7 +117,7 @@ _SMCDesignator: statement
ldy value
sty _SMCDesignator+1
.else
.error "Invalid usage of macro 'SMC_TransferValue'"
.error "Invalid usage of macro 'SMC_TransferValue'"
.endif
.endmacro
@ -129,7 +129,7 @@ _SMCDesignator: statement
.elseif .match ({register}, y)
ldy _SMCDesignator+1
.else
.error "Invalid usage of macro 'SMC_LoadValue'"
.error "Invalid usage of macro 'SMC_LoadValue'"
.endif
.endmacro
@ -141,7 +141,7 @@ _SMCDesignator: statement
.elseif .match ({register}, y)
sty _SMCDesignator+1
.else
.error "Invalid usage of macro 'SMC_StoreValue'"
.error "Invalid usage of macro 'SMC_StoreValue'"
.endif
.endmacro
@ -169,7 +169,7 @@ SMC_StoreValue label, register
ldy value
sty _SMCDesignator+2
.else
.error "Invalid usage of macro 'SMC_TransferHighByte'"
.error "Invalid usage of macro 'SMC_TransferHighByte'"
.endif
.endmacro
@ -181,7 +181,7 @@ SMC_StoreValue label, register
.elseif .match ({register}, y)
ldy _SMCDesignator+2
.else
.error "Invalid usage of macro 'SMC_LoadHighByte'"
.error "Invalid usage of macro 'SMC_LoadHighByte'"
.endif
.endmacro
@ -193,7 +193,7 @@ SMC_StoreValue label, register
.elseif .match ({register}, y)
sty _SMCDesignator+2
.else
.error "Invalid usage of macro 'SMC_StoreHighByte'"
.error "Invalid usage of macro 'SMC_StoreHighByte'"
.endif
.endmacro
@ -241,7 +241,7 @@ SMC_StoreValue label, register
sty _SMCDesignator+2
.endif
.else
.error "Invalid usage of macro 'SMC_TransferAddressSingle'"
.error "Invalid usage of macro 'SMC_TransferAddressSingle'"
.endif
.endmacro

2
asminc/telestrat.inc
View file

@ -367,5 +367,5 @@ XRWTS := $FFAA
; MACRO
.macro BRK_TELEMON value
.byte $00,value
.byte $00,value
.endmacro

56
include/_tia.h
View file

@ -11,60 +11,60 @@
/* TIA write / read registers */
struct __tia {
union {
unsigned char vsync;
unsigned char cxm0p;
unsigned char vsync;
unsigned char cxm0p;
};
union {
unsigned char vblank;
unsigned char cxm1p;
unsigned char vblank;
unsigned char cxm1p;
};
union {
unsigned char wsync;
unsigned char cxp0fb;
unsigned char wsync;
unsigned char cxp0fb;
};
union {
unsigned char rsync;
unsigned char cxp1fb;
unsigned char rsync;
unsigned char cxp1fb;
};
union {
unsigned char nusiz0;
unsigned char cxm0fb;
unsigned char nusiz0;
unsigned char cxm0fb;
};
union {
unsigned char nusiz1;
unsigned char cxm1fb;
unsigned char nusiz1;
unsigned char cxm1fb;
};
union {
unsigned char colup0;
unsigned char cxblpf;
unsigned char colup0;
unsigned char cxblpf;
};
union {
unsigned char colup1;
unsigned char cxppmm;
unsigned char colup1;
unsigned char cxppmm;
};
union {
unsigned char colupf;
unsigned char inpt0;
unsigned char colupf;
unsigned char inpt0;
};
union {
unsigned char colubk;
unsigned char inpt1;
unsigned char colubk;
unsigned char inpt1;
};
union {
unsigned char ctrlpf;
unsigned char inpt2;
unsigned char ctrlpf;
unsigned char inpt2;
};
union {
unsigned char refp0;
unsigned char inpt3;
unsigned char refp0;
unsigned char inpt3;
};
union {
unsigned char refp1;
unsigned char inpt4;
unsigned char refp1;
unsigned char inpt4;
};
union {
unsigned char pf0;
unsigned char inpt5;
unsigned char pf0;
unsigned char inpt5;
};
unsigned char pf1;
unsigned char pf2;

2
libsrc/common/getcpu.s
View file

@ -3,7 +3,7 @@
;
; unsigned char getcpu (void);
;
.include "zeropage.inc"
.include "zeropage.inc"
.export _getcpu
; ---------------------------------------------------------------------------

4
libsrc/telestrat/close.s
View file

@ -2,7 +2,7 @@
.export _close
.import addysp,popax
.import addysp,popax
.include "zeropage.inc"
.include "telestrat.inc"
@ -11,6 +11,6 @@
; int open (const char* name, int flags, ...); /* May take a mode argument */
.proc _close
BRK_TELEMON XCLOSE ; launch primitive ROM
BRK_TELEMON XCLOSE ; launch primitive ROM
rts
.endproc

26
libsrc/telestrat/mainargs.s
View file

@ -24,18 +24,18 @@ initmainargs:
ldx #0 ; Limit the length
L0: lda BUFEDT,x
beq L3
cmp #' '
bne L1
lda #0
beq L3
beq L3
cmp #' '
bne L1
lda #0
beq L3
L1: sta name,x
inx
cpx #FNAME_LEN
cpx #FNAME_LEN
bne L0
lda #0
lda #0
L3:
sta name,x
sta name,x
inc __argc ; argc always is equal to, at least, 1
@ -58,9 +58,9 @@ setterm:sta term ; Set end of argument marker
txa ; Get low byte
clc
adc #<BUFEDT
bcc L4
inc L5+1
adc #<BUFEDT
bcc L4
inc L5+1
L4:
sta argv,y ; argv[y]=&arg
L5:
@ -113,8 +113,8 @@ name: .res FNAME_LEN + 1
args: .res SCREEN_XSIZE * 2 - 1
param_found:
.res 1
.res 1
; char* argv[MAXARGS+1]={name};
argv:
.addr name
.addr name
.res MAXARGS * 2

10
libsrc/telestrat/open.s
View file

@ -17,8 +17,8 @@
dey ; ...checked (it generates a c compiler warning)
dey
dey
beq parmok ; Branch if parameter count ok
jsr addysp ; Fix stack, throw away unused parameters
beq parmok ; Branch if parameter count ok
jsr addysp ; Fix stack, throw away unused parameters
; Parameters ok. Pop the flags and save them into tmp3
@ -26,8 +26,8 @@ parmok:
jsr popax ; Get flagss
sta tmp3 ; save flags
; Get the filename from stack and parse it. Bail out if is not ok
jsr popax ; Get name
ldy tmp3 ; Get flags again
BRK_TELEMON XOPEN ; launch primitive ROM
jsr popax ; Get name
ldy tmp3 ; Get flags again
BRK_TELEMON XOPEN ; launch primitive ROM
rts
.endproc

2
libsrc/telestrat/read.s
View file

@ -37,5 +37,3 @@
; Here A and X contains number of bytes read
rts
.endproc

24
libsrc/telestrat/write.s
View file

@ -23,20 +23,20 @@
jsr popax ; get fd and discard
; if fd=0001 then it stdout
cpx #0
beq next
jmp L1
cpx #0
beq next
jmp L1
next:
cmp #1
beq L1
cmp #1
beq L1
; here it's a file opened
lda ptr1
sta PTR_READ_DEST
lda ptr1+1
sta PTR_READ_DEST+1
lda ptr3
ldy ptr3+1
lda ptr1
sta PTR_READ_DEST
lda ptr1+1
sta PTR_READ_DEST+1
lda ptr3
ldy ptr3+1
BRK_TELEMON XFWRITE
; compute nb of bytes written
@ -81,5 +81,3 @@ L9: lda ptr3
rts
.endproc

44
samples/atari2600hello.c
View file

@ -25,32 +25,32 @@ void main(void) {
bss_v = 0x88; // Testing BSS variable
for/*ever*/(;;) {
// Vertical Sync signal
TIA.vsync = 0x02;
TIA.wsync = 0x00;
TIA.wsync = 0x00;
TIA.wsync = 0x00;
TIA.vsync = 0x00;
// Vertical Sync signal
TIA.vsync = 0x02;
TIA.wsync = 0x00;
TIA.wsync = 0x00;
TIA.wsync = 0x00;
TIA.vsync = 0x00;
// Vertical Blank timer setting
RIOT.tim64t = VBLANK_TIM64;
// Vertical Blank timer setting
RIOT.tim64t = VBLANK_TIM64;
// Doing frame computation during blank
TIA.colubk = color++; // Update color
// Doing frame computation during blank
TIA.colubk = color++; // Update color
// Wait for end of Vertical Blank
while (RIOT.timint == 0) {}
TIA.wsync = 0x00;
TIA.vblank = 0x00; // Turn on beam
// Wait for end of Vertical Blank
while (RIOT.timint == 0) {}
TIA.wsync = 0x00;
TIA.vblank = 0x00; // Turn on beam
// Display frame
RIOT.t1024t = KERNAL_T1024;
while (RIOT.timint == 0) {}
TIA.wsync = 0x00;
TIA.vblank = 0x02; // Turn off beam
// Display frame
RIOT.t1024t = KERNAL_T1024;
while (RIOT.timint == 0) {}
TIA.wsync = 0x00;
TIA.vblank = 0x02; // Turn off beam
// Overscan
RIOT.tim64t = OVERSCAN_TIM64;
while (RIOT.timint == 0) {}
// Overscan
RIOT.tim64t = OVERSCAN_TIM64;
while (RIOT.timint == 0) {}
}
}

4
src/cc65/codegen.c
View file

@ -4256,7 +4256,7 @@ void g_initauto (unsigned Label, unsigned Size)
AddCodeLine ("lda %s,y", GetLabelName (CF_STATIC, Label, 0));
AddCodeLine ("sta (sp),y");
AddCodeLine ("iny");
AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size);
AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size);
AddCodeLine ("bne %s", LocalLabelName (CodeLabel));
}
}
@ -4281,7 +4281,7 @@ void g_initstatic (unsigned InitLabel, unsigned VarLabel, unsigned Size)
AddCodeLine ("lda %s,y", GetLabelName (CF_STATIC, InitLabel, 0));
AddCodeLine ("sta %s,y", GetLabelName (CF_STATIC, VarLabel, 0));
AddCodeLine ("iny");
AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size);
AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size);
AddCodeLine ("bne %s", LocalLabelName (CodeLabel));
} else {
/* Use the easy way here: memcpy() */

6
src/cc65/pragma.c
View file

@ -898,9 +898,9 @@ static void ParsePragma (void)
FlagPragma (&B, &StaticLocals);
break;
case PRAGMA_WRAPPED_CALL:
WrappedCallPragma(&B);
break;
case PRAGMA_WRAPPED_CALL:
WrappedCallPragma(&B);
break;
case PRAGMA_WARN:
WarnPragma (&B);

4
src/common/intptrstack.h
View file

@ -47,8 +47,8 @@
typedef struct IntPtrStack IntPtrStack;
struct IntPtrInner {
long val;
void *ptr;
long val;
void *ptr;
};
struct IntPtrStack {
unsigned Count;

3
testcode/lib/gamate/lcdtest.s
View file

@ -13,7 +13,7 @@ psa: .word 0
.bss
temp_x: .byte 0
temp_y: .byte 0
temp_a: .byte 0
temp_a: .byte 0
irq_count: .byte 0
nmi_count: .byte 0
psx: .byte 0
@ -419,4 +419,3 @@ printsign1:
ldy temp_y
rts
.endproc