aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/lib/forth-2012
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/msp430/lib/forth-2012')
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core-ext.frt12
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core-ext/marker.frt3
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core.frt21
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core/c-comma.frt5
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core/environment-q.frt28
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core/evaluate.frt22
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core/star-slash-mod.frt6
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/core/value.frt9
-rw-r--r--amforth-6.5/msp430/lib/forth-2012/double/d-invert.frt4
9 files changed, 0 insertions, 110 deletions
diff --git a/amforth-6.5/msp430/lib/forth-2012/core-ext.frt b/amforth-6.5/msp430/lib/forth-2012/core-ext.frt
deleted file mode 100644
index a7ea6d6..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core-ext.frt
+++ /dev/null
@@ -1,12 +0,0 @@
-\ 'core-ext.frt' generated automatically, do not edit
-#include case.frt
-\ #include case-test.frt
-\ #include exceptions.frt
-#include marker.frt
-\ #include marker-test.frt
-
-\ update the environment
-\ get-current environment set-current
-\ : core-ext 0 ;
-\ reset the definition word list
-\ set-current
diff --git a/amforth-6.5/msp430/lib/forth-2012/core-ext/marker.frt b/amforth-6.5/msp430/lib/forth-2012/core-ext/marker.frt
deleted file mode 100644
index b4e47d3..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core-ext/marker.frt
+++ /dev/null
@@ -1,3 +0,0 @@
-
-\ dummy marker
-: marker create ; \ No newline at end of file
diff --git a/amforth-6.5/msp430/lib/forth-2012/core.frt b/amforth-6.5/msp430/lib/forth-2012/core.frt
deleted file mode 100644
index f838dfc..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core.frt
+++ /dev/null
@@ -1,21 +0,0 @@
-\ 'core.frt' generated automatically, do not edit
-#include 2over.frt
-#include 2swap.frt
-#include blank.frt
-#include c-comma.frt
-#include char-plus.frt
-#include chars.frt
-#include dot-paren.frt
-#include environment-q.frt
-#include erase.frt
-#include evaluate.frt
-#include star-slash.frt
-#include move.frt
-#include source-id.frt
-#include find.frt
-
-\ update the environment
-get-current environment set-current
-: core -1 ;
-\ reset the definition word list
-set-current
diff --git a/amforth-6.5/msp430/lib/forth-2012/core/c-comma.frt b/amforth-6.5/msp430/lib/forth-2012/core/c-comma.frt
deleted file mode 100644
index 8741509..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core/c-comma.frt
+++ /dev/null
@@ -1,5 +0,0 @@
-
-\ only a dummy file for certain use cases like
-\ the hayes tester. The actual definition is
-\ already in the words/ directory
-
diff --git a/amforth-6.5/msp430/lib/forth-2012/core/environment-q.frt b/amforth-6.5/msp430/lib/forth-2012/core/environment-q.frt
deleted file mode 100644
index 3ba440f..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core/environment-q.frt
+++ /dev/null
@@ -1,28 +0,0 @@
-\ environment queries are placed in a
-\ separate wordlist.
-
-: environment? \ addr len -- 0|x*i -1
- environment search-wordlist dup
- if >r execute r> then
-;
-
-\ some environment queries
-
-\ save the definitions word list for this file
-\ and switch to the environment queries wordlist
-get-current environment set-current
-
-: /counted-strings &60 ;
-: floored 0 ;
-: address-unit-bits $10 ;
-: max-char $ff ;
-: max-d $7fffffff. ;
-: max-ud $ffffffff. ;
-: max-n $7fff ;
-: max-u $ffff ;
-
-: return-stack-cells &10 ;
-: stack-cells &10 ;
-
-\ reset the definition word list
-set-current
diff --git a/amforth-6.5/msp430/lib/forth-2012/core/evaluate.frt b/amforth-6.5/msp430/lib/forth-2012/core/evaluate.frt
deleted file mode 100644
index 9f4cf3b..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core/evaluate.frt
+++ /dev/null
@@ -1,22 +0,0 @@
-\ evaluate
-\ temporarily redirect the input source
-\ to string buffer. Return the the previous
-\ input source afterwards and continue
-
-\ some helper words
-variable strlen
-variable str
-: source-string str @ strlen @ ;
-
-: evaluate \ i*x addr len -- j*y
- ['] source defer@ >r
- >in @ >r
- 0 >in !
- strlen !
- str !
- ['] source-string to source
- ['] interpret catch
- r> >in !
- r> to source
- throw
-;
diff --git a/amforth-6.5/msp430/lib/forth-2012/core/star-slash-mod.frt b/amforth-6.5/msp430/lib/forth-2012/core/star-slash-mod.frt
deleted file mode 100644
index 741b4cd..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core/star-slash-mod.frt
+++ /dev/null
@@ -1,6 +0,0 @@
-
-\ MSP has another division type
-
-: */mod ( )
- >r m* r> fm/mod
-;
diff --git a/amforth-6.5/msp430/lib/forth-2012/core/value.frt b/amforth-6.5/msp430/lib/forth-2012/core/value.frt
deleted file mode 100644
index 41a7e70..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/core/value.frt
+++ /dev/null
@@ -1,9 +0,0 @@
-\ the value (in RAM)
-
-: value ( n -- )
- (value)
- here , \ compile the RAM address
- ['] @ ,
- ['] ! ,
- here ! 2 allot
-;
diff --git a/amforth-6.5/msp430/lib/forth-2012/double/d-invert.frt b/amforth-6.5/msp430/lib/forth-2012/double/d-invert.frt
deleted file mode 100644
index c951d59..0000000
--- a/amforth-6.5/msp430/lib/forth-2012/double/d-invert.frt
+++ /dev/null
@@ -1,4 +0,0 @@
-
-: dinvert
- swap invert swap invert
-;