aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/rshift.asm
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/msp430/words/rshift.asm')
-rw-r--r--amforth-6.5/msp430/words/rshift.asm11
1 files changed, 0 insertions, 11 deletions
diff --git a/amforth-6.5/msp430/words/rshift.asm b/amforth-6.5/msp430/words/rshift.asm
deleted file mode 100644
index d0201ed..0000000
--- a/amforth-6.5/msp430/words/rshift.asm
+++ /dev/null
@@ -1,11 +0,0 @@
-;C RSHIFT x1 u -- x2 logical R shift u places
- CODEHEADER(RSHIFT,6,"rshift")
- MOV @PSP+,W
- AND #1Fh,TOS ; no need to shift more than 16
- JZ RSH_X
-RSH_1: CLRC
- RRC W
- SUB #1,TOS
- JNZ RSH_1
-RSH_X: MOV W,TOS
- NEXT