From 67d25d837ac55f28a366c0a3b262e439a6e75fc3 Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Sat, 19 Aug 2017 12:15:28 +0200 Subject: Add AmForth --- amforth-6.5/avr8/dict/core_4k.inc | 98 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 98 insertions(+) create mode 100644 amforth-6.5/avr8/dict/core_4k.inc (limited to 'amforth-6.5/avr8/dict/core_4k.inc') diff --git a/amforth-6.5/avr8/dict/core_4k.inc b/amforth-6.5/avr8/dict/core_4k.inc new file mode 100644 index 0000000..6e083d5 --- /dev/null +++ b/amforth-6.5/avr8/dict/core_4k.inc @@ -0,0 +1,98 @@ +; first the assembly words to keep them +; in a short distance to DO_NEXT +.include "words/n_to_r.asm" +.include "words/n_r_from.asm" +.include "words/d-2star.asm" +.include "words/d-2slash.asm" +.include "words/d-plus.asm" +.include "words/d-minus.asm" +.include "words/d-invert.asm" +.include "words/slashmod.asm" +.include "words/abs.asm" +.include "words/pick.asm" +.include "words/cellplus.asm" +.include "dict/interrupt.inc" + +; now the relocatable colon words +.include "words/prompt-ok.asm" +.include "words/prompt-ready.asm" +.include "words/prompt-error.asm" + +.include "words/quit.asm" +.include "words/pause.asm" +.include "words/cold.asm" +.include "words/warm.asm" + +.include "words/handler.asm" +.include "words/catch.asm" +.include "words/throw.asm" + + +.include "words/edefer-fetch.asm" +.include "words/edefer-store.asm" +.include "words/rdefer-fetch.asm" +.include "words/rdefer-store.asm" +.include "words/udefer-fetch.asm" +.include "words/udefer-store.asm" +.include "words/defer-store.asm" +.include "words/defer-fetch.asm" +.include "words/do-defer.asm" + +.include "words/u-dot.asm" +.include "words/u-dot-r.asm" + +;;;;;;;;;;;;;;;;;;;;;;;;;;;; +.include "words/uslashmod.asm" +.include "words/negate.asm" +.include "words/slash.asm" +.include "words/mod.asm" + +.include "words/min.asm" +.include "words/max.asm" +.include "words/within.asm" + +.include "words/show-wordlist.asm" +.include "words/words.asm" + +.include "words/dot-quote.asm" +.include "words/squote.asm" +.include "words/fill.asm" + +.include "words/f_cpu.asm" +.include "words/state.asm" +.include "words/base.asm" + +.include "words/cells.asm" + +.include "words/2dup.asm" +.include "words/2drop.asm" +.include "words/tuck.asm" + +.include "words/to-in.asm" +.include "words/pad.asm" +.include "words/emit.asm" +.include "words/emitq.asm" +.include "words/key.asm" +.include "words/keyq.asm" + +.include "words/dp.asm" +.include "words/ehere.asm" +.include "words/here.asm" +.include "words/allot.asm" + +.include "words/bin.asm" +.include "words/decimal.asm" +.include "words/hex.asm" +.include "words/bl.asm" + +.include "words/turnkey.asm" +.include "words/to-upper.asm" +.include "words/to-lower.asm" + +.include "words/q-stack.asm" +.include "words/bounds.asm" +.include "words/cr.asm" +.include "words/space.asm" +.include "words/spaces.asm" +.include "words/s-to-d.asm" +.include "words/to-body.asm" -- cgit v1.2.3