1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-18 00:07:21 +00:00

moved ourcl to bss

git-svn-id: svn://svn.cc65.org/cc65/trunk@402 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cpg 2000-10-29 00:06:50 +00:00
parent ea6c5c8d43
commit 050869cbfa

View File

@ -36,9 +36,14 @@ getargs:
bcs argdos ; carry set = DOS supports arguments bcs argdos ; carry set = DOS supports arguments
rts rts
; Initialize ourcl buffer
argdos: lda #ATEOL
sta ourcl+CL_SIZE
; Move SpartaDOS command line to our own buffer ; Move SpartaDOS command line to our own buffer
argdos: lda DOSVEC lda DOSVEC
clc clc
adc #<LBUF adc #<LBUF
sta ptr1 sta ptr1
@ -67,10 +72,10 @@ movdon: lda #0
; Store dummy argument ; Store dummy argument
ldy #LBUF ldy #LBUF
lda dumpar1 lda #'X'
sta (DOSVEC),y sta (DOSVEC),y
iny iny
lda dumpar2 lda #ATEOL
sta (DOSVEC),y sta (DOSVEC),y
; One extra store to avoid the buggy sequence from OS/A+ DOS: ; One extra store to avoid the buggy sequence from OS/A+ DOS:
@ -197,18 +202,6 @@ _getdefdev:
.data .data
; Dummy argument to get default device
dumpar1:
.byte "X"
dumpar2:
.byte ATEOL
; Buffer for command line / argv strings
ourcl: .res CL_SIZE
.byte ATEOL
; Default device ; Default device
defdev: defdev:
@ -218,3 +211,7 @@ defdev:
argc: .res 2 argc: .res 2
argv: .res (1 + MAXARGS) * 2 argv: .res (1 + MAXARGS) * 2
; Buffer for command line / argv strings
ourcl: .res CL_SIZE+1