aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/base-execute.frt
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/common/lib/base-execute.frt')
-rw-r--r--amforth-6.5/common/lib/base-execute.frt7
1 files changed, 0 insertions, 7 deletions
diff --git a/amforth-6.5/common/lib/base-execute.frt b/amforth-6.5/common/lib/base-execute.frt
deleted file mode 100644
index 44eaff8..0000000
--- a/amforth-6.5/common/lib/base-execute.frt
+++ /dev/null
@@ -1,7 +0,0 @@
-\ execute xt with the content of BASE being u, and
-\ restoring the original BASE afterwards.
-: base-execute ( i*x xt u -- j*x ) \ gforth
- base @ >r
- base ! execute
- r> base !
-; \ No newline at end of file