bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Comment and tab fix. No code changes.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5760 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2012-07-06 19:56:42 +00:00
parent f9f660dd5d
commit db8cac9501
1 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
libsrc/runtime/shl.s
View File

@@ -11,15 +11,15 @@
; ;
.export tosaslax, tosshlax, aslaxy, shlaxy .export tosaslax, tosshlax, aslaxy, shlaxy
.import popax .import popax
.importzp tmp1 .importzp tmp1
.macpack cpu .macpack cpu
tosshlax: tosshlax:
tosaslax: tosaslax:
sta tmp1 ; Save shift count it sta tmp1 ; Save shift count
jsr popax ; Get the left hand operand jsr popax ; Get the left hand operand
ldy tmp1 ; Get shift count ldy tmp1 ; Get shift count
@@ -71,13 +71,13 @@ L4: adc #8 ; Correct counter
tay ; Shift count into Y tay ; Shift count into Y
pla ; Restore low byte pla ; Restore low byte
stx tmp1 ; Save high byte of lhs stx tmp1 ; Save high byte of lhs
L5: asl a L5: asl a
rol tmp1 rol tmp1
dey dey
bne L5 bne L5
; Done with shift ; Done with shift
ldx tmp1 ldx tmp1
L9: rts L9: rts