X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fcbm%2Fc_setnam.s;h=3249d8539a39b0fbeef3efd0a81dbc867bd2d6a1;hb=d9778994fab808b829cc15dd612fd48a18271c0f;hp=8f35d37fb284f50ec966cb40d45d928f6bdfa690;hpb=6d498d81872e506d0e1f069d01a9d4d43a962639;p=cc65 diff --git a/libsrc/cbm/c_setnam.s b/libsrc/cbm/c_setnam.s index 8f35d37fb..3249d8539 100644 --- a/libsrc/cbm/c_setnam.s +++ b/libsrc/cbm/c_setnam.s @@ -4,21 +4,21 @@ ; void __fastcall__ cbm_k_setnam (const char* Name); ; - .export _cbm_k_setnam + .export _cbm_k_setnam .import SETNAM - .importzp ptr1 + .importzp ptr1 _cbm_k_setnam: - sta ptr1 ; Store pointer to file name - stx ptr1+1 - ldy #$FF -@Loop: iny ; Get length of name - lda (ptr1),y - bne @Loop + sta ptr1 ; Store pointer to file name + stx ptr1+1 + ldy #$FF +@Loop: iny ; Get length of name + lda (ptr1),y + bne @Loop - tya ; Length - ldx ptr1 - ldy ptr1+1 - jmp SETNAM + tya ; Length + ldx ptr1 + ldy ptr1+1 + jmp SETNAM