From eb329bdac9fe56d67cb130fb6cdbb28743c6504b Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Sat, 12 Dec 2020 16:31:53 -0800
Subject: Bunch of changes, including some bpeg->bp renaming, and adding
 visualizations

---
 compiler.c | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'compiler.c')

diff --git a/compiler.c b/compiler.c
index 6a8de58..48d0023 100644
--- a/compiler.c
+++ b/compiler.c
@@ -281,6 +281,8 @@ vm_op_t *bpeg_simplepattern(file_t *f, const char *str)
             str = after_spaces(str);
             if (!matchchar(&str, ')'))
                 file_err(f, origin, str, "This parenthesis group isn't properly closed.");
+            op->start = origin;
+            op->end = str;
             break;
         }
         // Square brackets
@@ -330,6 +332,17 @@ vm_op_t *bpeg_simplepattern(file_t *f, const char *str)
             op->len = pat->len;
             break;
         }
+        // Hide
+        case '~': {
+            vm_op_t *pat = bpeg_simplepattern(f, str);
+            if (!pat)
+                file_err(f, str, str, "There should be a pattern after this '~'");
+            str = pat->end;
+            op->op = VM_HIDE;
+            op->len = 0;
+            op->args.pat = pat;
+            break;
+        }
         // Replacement
         case '{': {
             str = after_spaces(str);
-- 
cgit v1.2.3