mirror of
https://github.com/cc65/cc65.git
synced 2024-11-02 03:04:31 +00:00
23 lines
256 B
ArmAsm
23 lines
256 B
ArmAsm
;
|
|
; Stefan Haubenthal, 2005-06-08
|
|
;
|
|
; CBM _curunit to _cwd
|
|
;
|
|
|
|
.export initcwd
|
|
.import __curunit, __cwd, devicestr
|
|
.importzp ptr2
|
|
|
|
.segment "INIT"
|
|
|
|
.proc initcwd
|
|
|
|
lda #<__cwd
|
|
ldx #>__cwd
|
|
sta ptr2
|
|
stx ptr2+1
|
|
lda __curunit
|
|
jmp devicestr
|
|
|
|
.endproc
|