mirror of
https://github.com/cc65/cc65.git
synced 2024-11-19 06:31:31 +00:00
20 lines
347 B
ArmAsm
20 lines
347 B
ArmAsm
|
;
|
||
|
|
; Oliver Schmidt, 2012-10-21
|
||
|
|
;
|
||
|
|
; unsigned char getcurrentdevice (void);
|
||
|
|
;
|
||
|
|
|
||
|
|
.export _getcurrentdevice
|
||
|
|
.import curunit
|
||
|
|
|
||
|
|
;------------------------------------------------------------------------------
|
||
|
|
; _getcurrentdevice
|
||
|
|
|
||
|
|
.proc _getcurrentdevice
|
||
|
|
|
||
|
|
lda curunit
|
||
|
|
ldx #$00
|
||
|
|
rts
|
||
|
|
|
||
|
|
.endproc
|