aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/lit.asm
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/msp430/words/lit.asm')
-rw-r--r--amforth-6.5/msp430/words/lit.asm8
1 files changed, 0 insertions, 8 deletions
diff --git a/amforth-6.5/msp430/words/lit.asm b/amforth-6.5/msp430/words/lit.asm
deleted file mode 100644
index a186a4f..0000000
--- a/amforth-6.5/msp430/words/lit.asm
+++ /dev/null
@@ -1,8 +0,0 @@
-;Z lit -- x fetch inline literal to stack
-; This is the primtive compiled by LITERAL.
- HEADLESS(XT_DOLITERAL,PFA_DOLITERAL)
-PFA_DOLITERAL:
- SUB #2,PSP ; 1 push old TOS..
- MOV TOS,0(PSP) ; 4 ..onto stack
- MOV @IP+,TOS ; 2 fetch new TOS value
- NEXT ; 4