From 8e7b2fa78a4da10732618fcda9c6f74c8f5d97b7 Mon Sep 17 00:00:00 2001
From: Roberto Alsina <roberto.alsina@gmail.com>
Date: Mon, 10 Jul 2023 22:11:43 -0300
Subject: [PATCH] open/close match code

---
 shortcodes.rl | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/shortcodes.rl b/shortcodes.rl
index b0c3d45..05297f8 100644
--- a/shortcodes.rl
+++ b/shortcodes.rl
@@ -21,6 +21,7 @@ bstring grab_chunk(char *start, char *end) {
     % {bcatStatic(output, "N ");
        bcatblk(output, mark, p-mark);
        bcatStatic(output, "\n");
+       bassignblk (new_name, mark, p-mark);
       };
   argname = alpha+
     > mark
@@ -54,10 +55,16 @@ bstring grab_chunk(char *start, char *end) {
   end = end_p | end_b ;
 
   shortcode = (start spc name (sep arg)* spc end)
-  @ {bcatStatic(output, "+++ opening\n");};
+  @ {
+      bcatStatic(output, "+++ opening\n");
+      bassign(open_name, new_name);
+    };
 
   closing_shortcode = (start spc '/' name spc end)
-  @ {bcatStatic(output, "--- closing\n");};
+  @ {
+    bcatStatic(output, "--- closing\n");
+    printf("closing from %s to %s", open_name->data, new_name->data);
+  };
 
 
   main := (any* (shortcode | closing_shortcode))*;
@@ -70,6 +77,8 @@ bstring parse(char *input) {
 
     char *p = input;
     char *pe = p + strlen(input);
+    bstring open_name = bfromcstr("");
+    bstring new_name = bfromcstr("");
 
     char *mark = 0;
     bstring output = bfromcstr("");