From 6d1dcf84bda0d2c22820ed760ff38a19e39ca53d Mon Sep 17 00:00:00 2001
From: ketmar <>
Date: Fri, 29 Sep 2023 16:16:20 +0000
Subject: [PATCH] fixed syntax parser

FossilOrigin-Name: 63edc0fdae005d08f57a06212a434d1e097a694f4974790de997a8774fb3280c
---
 config/syntax/urforth.sxh | 5 ++++-
 src/libsynt/sx_cdfa.c     | 6 +++---
 2 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/config/syntax/urforth.sxh b/config/syntax/urforth.sxh
index 445e667..ffaa70b 100644
--- a/config/syntax/urforth.sxh
+++ b/config/syntax/urforth.sxh
@@ -24,7 +24,7 @@ default-style = c-default
 code-block-chars = !empty!
 // bracket-chars = !empty!
 // this resets word jump chars
-word-chars = !non-blanks!
+word-chars = !non-blank!
 // setup word jump chars again
 word-jump-chars = !default!
 
@@ -48,6 +48,9 @@ keyword special {
   else
   endif
   then
+
+  // /UFO[:]\S+/
+  // /URASM[:]\S+/
 }
 
 
diff --git a/src/libsynt/sx_cdfa.c b/src/libsynt/sx_cdfa.c
index 2eee57f..43ecc40 100644
--- a/src/libsynt/sx_cdfa.c
+++ b/src/libsynt/sx_cdfa.c
@@ -1841,11 +1841,11 @@ SXED_PUBLIC void sxed_synhi_parse_wchars (uint32_t wchars[128/32], const char *s
   fprintf(stderr, "WC: %s\n", str);
   #endif
   memset(wchars, 0, 128/32*4);
-  if (strcmp(str, "!empty!")) {
+  if (strcmp(str, "!empty!") == 0) {
     // do nothing
-  } else if (strcmp(str, "!non-blanks!")) {
+  } else if (strcmp(str, "!non-blank!") == 0) {
     for (int f = 33; f < 128; f += 1) wc_set((char)f);
-  } else if (strcmp(str, "!default!")) {
+  } else if (strcmp(str, "!default!") == 0) {
     wchars[0] = 0x00000000U;
     wchars[1] = 0x03ff0010U;
     wchars[2] = 0x87fffffeU;
-- 
2.11.4.GIT