aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/lib/exception.frt
diff options
context:
space:
mode:
Diffstat (limited to 'amforth-6.5/common/lib/exception.frt')
-rw-r--r--amforth-6.5/common/lib/exception.frt15
1 files changed, 0 insertions, 15 deletions
diff --git a/amforth-6.5/common/lib/exception.frt b/amforth-6.5/common/lib/exception.frt
deleted file mode 100644
index d9f7a87..0000000
--- a/amforth-6.5/common/lib/exception.frt
+++ /dev/null
@@ -1,15 +0,0 @@
-
-
-\ allocate an exception number
-\ is less than -4096, keeps track in EEPROM
-
--4096 Evalue exception
-: exception ( -- n ) exception dup 1- to exception ;
-
-\ usage
-\ the code sequence
-\ exception constant !!foo
-\ ... if !!foo throw then ...
-\ prints
-\ ?? -4096
-\ and returns to the command prompt if not catched \ No newline at end of file