Removed (pretty inconsistently used) tab chars from source code base.
This commit is contained in:
@@ -4,49 +4,49 @@
|
||||
; int setjmp (jmp_buf buf);
|
||||
;
|
||||
|
||||
.export __setjmp
|
||||
.importzp sp, ptr1
|
||||
.export __setjmp
|
||||
.importzp sp, ptr1
|
||||
|
||||
__setjmp:
|
||||
sta ptr1 ; Save buf
|
||||
stx ptr1+1
|
||||
ldy #0
|
||||
sta ptr1 ; Save buf
|
||||
stx ptr1+1
|
||||
ldy #0
|
||||
|
||||
; The parameter stack is now empty, put it into buf
|
||||
|
||||
lda sp
|
||||
sta (ptr1),y
|
||||
iny
|
||||
lda sp+1
|
||||
sta (ptr1),y
|
||||
iny
|
||||
lda sp
|
||||
sta (ptr1),y
|
||||
iny
|
||||
lda sp+1
|
||||
sta (ptr1),y
|
||||
iny
|
||||
|
||||
; Put the return stack pointer next
|
||||
|
||||
tsx
|
||||
inx
|
||||
inx ; drop return address
|
||||
txa
|
||||
sta (ptr1),y
|
||||
iny
|
||||
tsx
|
||||
inx
|
||||
inx ; drop return address
|
||||
txa
|
||||
sta (ptr1),y
|
||||
iny
|
||||
|
||||
; Last thing is the return address.
|
||||
|
||||
pla
|
||||
tax
|
||||
pla
|
||||
sta (ptr1),y ; high byte first
|
||||
iny
|
||||
pha
|
||||
txa
|
||||
sta (ptr1),y
|
||||
pha
|
||||
pla
|
||||
tax
|
||||
pla
|
||||
sta (ptr1),y ; high byte first
|
||||
iny
|
||||
pha
|
||||
txa
|
||||
sta (ptr1),y
|
||||
pha
|
||||
|
||||
; Return zero
|
||||
|
||||
lda #0
|
||||
tax
|
||||
rts
|
||||
lda #0
|
||||
tax
|
||||
rts
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user