space optimization by Stefan Haubenthal
git-svn-id: svn://svn.cc65.org/cc65/trunk@3777 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -1,5 +1,5 @@
|
|||||||
;
|
;
|
||||||
; Freddy Offenga & Christian Groessler, June 2004
|
; Freddy Offenga, Stefan Haubenthal, Christian Groessler, March 2007
|
||||||
;
|
;
|
||||||
; detect the DOS version we're running on
|
; detect the DOS version we're running on
|
||||||
;
|
;
|
||||||
@@ -35,16 +35,14 @@ detect: lda #ATARIDOS
|
|||||||
cmp (DOSVEC),y
|
cmp (DOSVEC),y
|
||||||
beq done
|
beq done
|
||||||
lda #OSADOS
|
lda #OSADOS
|
||||||
sta __dos_type
|
.byte $2C ; BIT <abs>
|
||||||
rts
|
|
||||||
|
|
||||||
spdos: lda #SPARTADOS
|
spdos: lda #SPARTADOS
|
||||||
sta __dos_type
|
.byte $2C ; BIT <abs>
|
||||||
done: rts
|
|
||||||
|
|
||||||
mydos: lda #MYDOS
|
mydos: lda #MYDOS
|
||||||
sta __dos_type
|
sta __dos_type
|
||||||
rts
|
done: rts
|
||||||
|
|
||||||
; ------------------------------------------------------------------------
|
; ------------------------------------------------------------------------
|
||||||
; Data
|
; Data
|
||||||
|
|||||||
Reference in New Issue
Block a user