[OpenBIOS] r819 - forth/lib
svn at openbios.org
svn at openbios.org
Thu Mar 6 17:29:11 CET 2008
Author: wmb
Date: 2008-03-06 17:29:11 +0100 (Thu, 06 Mar 2008)
New Revision: 819
Modified:
forth/lib/editcmd.fth
Log:
Added an error handler to do-command so that the system won't
crash if one of the keystroke commands aborts.
Modified: forth/lib/editcmd.fth
===================================================================
--- forth/lib/editcmd.fth 2008-03-06 05:28:23 UTC (rev 818)
+++ forth/lib/editcmd.fth 2008-03-06 16:29:11 UTC (rev 819)
@@ -44,7 +44,7 @@
name-buf "copy
name-buf lastchar @ add-char-to-name
name-buf count keys token@ search-wordlist ( false | cfa true )
- if execute else not-found then
+ if catch drop else not-found then
;
defer printable-char
More information about the OpenBIOS
mailing list