aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/doconstant.asm
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/avr8/words/doconstant.asm')
-rw-r--r--amforth-6.5/avr8/words/doconstant.asm15
1 files changed, 0 insertions, 15 deletions
diff --git a/amforth-6.5/avr8/words/doconstant.asm b/amforth-6.5/avr8/words/doconstant.asm
deleted file mode 100644
index 0ecdf27..0000000
--- a/amforth-6.5/avr8/words/doconstant.asm
+++ /dev/null
@@ -1,15 +0,0 @@
-; ( -- addr )
-; System
-; place data field address on TOS
-;VE_DOCONSTANT:
-; .dw $ff0a
-; .db "(constant)"
-; .dw VE_HEAD
-; .set VE_HEAD = VE_DOCONSTANT
-XT_DOCONSTANT:
- .dw PFA_DOCONSTANT
-PFA_DOCONSTANT:
- savetos
- movw tosl, wl
- adiw tosl, 1
- jmp_ DO_NEXT