Removed (pretty inconsistently used) tab chars from source code base.
This commit is contained in:
@@ -2,30 +2,30 @@
|
||||
; Stefan Haubenthal, 2008-04-29
|
||||
;
|
||||
|
||||
.export initcwd
|
||||
.import findfreeiocb
|
||||
.import __cwd
|
||||
.include "atari.inc"
|
||||
.export initcwd
|
||||
.import findfreeiocb
|
||||
.import __cwd
|
||||
.include "atari.inc"
|
||||
|
||||
.proc initcwd
|
||||
.proc initcwd
|
||||
|
||||
jsr findfreeiocb
|
||||
bne oserr
|
||||
lda #48
|
||||
sta ICCOM,x
|
||||
lda #<__cwd
|
||||
sta ICBLL,x
|
||||
lda #>__cwd
|
||||
sta ICBLH,x
|
||||
jsr CIOV
|
||||
bmi oserr
|
||||
ldx #0 ; ATEOL -> \0
|
||||
: lda __cwd,x
|
||||
inx
|
||||
cmp #ATEOL
|
||||
bne :-
|
||||
lda #0
|
||||
sta __cwd-1,x
|
||||
oserr: rts
|
||||
jsr findfreeiocb
|
||||
bne oserr
|
||||
lda #48
|
||||
sta ICCOM,x
|
||||
lda #<__cwd
|
||||
sta ICBLL,x
|
||||
lda #>__cwd
|
||||
sta ICBLH,x
|
||||
jsr CIOV
|
||||
bmi oserr
|
||||
ldx #0 ; ATEOL -> \0
|
||||
: lda __cwd,x
|
||||
inx
|
||||
cmp #ATEOL
|
||||
bne :-
|
||||
lda #0
|
||||
sta __cwd-1,x
|
||||
oserr: rts
|
||||
|
||||
.endproc
|
||||
|
||||
Reference in New Issue
Block a user