From 6c48c1b53c60c2b4e48f432646dc53c608082840 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Thu, 9 Apr 2020 08:27:14 -0400
Subject: [PATCH] parse: be a bit more graceful on parsing meta-failure

---
 forth/parse.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/forth/parse.fs b/forth/parse.fs
index d7dc930..9844a9a 100644
--- a/forth/parse.fs
+++ b/forth/parse.fs
@@ -80,7 +80,7 @@
     (parseb) IF EXIT THEN
     (parsed) IF EXIT THEN
     ( nothing works )
-    LIT< (wnf) (find) DROP EXECUTE
+    LIT< (wnf) (find) IF EXECUTE ELSE ABORT THEN
 ;
 
 ' (parse) (parse*) !