test #2674
This commit is contained in:
@@ -6,20 +6,20 @@
|
||||
|
||||
.export popsreg
|
||||
.import incsp2
|
||||
.importzp sp, sreg
|
||||
.importzp c_sp, sreg
|
||||
|
||||
.macpack cpu
|
||||
|
||||
popsreg:
|
||||
pha ; save A
|
||||
ldy #1
|
||||
lda (sp),y ; get hi byte
|
||||
lda (c_sp),y ; get hi byte
|
||||
sta sreg+1 ; store it
|
||||
.if (.cpu .bitand ::CPU_ISET_65SC02)
|
||||
lda (sp) ; get lo byte
|
||||
lda (c_sp) ; get lo byte
|
||||
.else
|
||||
dey
|
||||
lda (sp),y ; get lo byte
|
||||
lda (c_sp),y ; get lo byte
|
||||
.endif
|
||||
sta sreg ; store it
|
||||
pla ; get A back
|
||||
|
||||
Reference in New Issue
Block a user