From 47fe75341131775a35dcd5c8c16bc5f21a274c5e Mon Sep 17 00:00:00 2001
From: ryanfleury <ryan.j.fleury@gmail.com>
Date: Tue, 9 Feb 2021 08:27:24 -0700
Subject: [PATCH] write out initial basic namespace parsing, without affecting
 anything

---
 source/md.h      |  3 +++
 source/md_impl.c | 44 +++++++++++++++++++++++++++++++++++++++-----
 2 files changed, 42 insertions(+), 5 deletions(-)

diff --git a/source/md.h b/source/md.h
index 5627c0b..8b8bbe4 100644
--- a/source/md.h
+++ b/source/md.h
@@ -294,6 +294,7 @@ typedef enum MD_NodeKind
 {
     MD_NodeKind_Nil,
     MD_NodeKind_File,
+    MD_NodeKind_Namespace,
     MD_NodeKind_Label,
     MD_NodeKind_Tag,
     MD_NodeKind_MAX,
@@ -485,6 +486,8 @@ struct MD_ParseCtx
     MD_u8 *at;
     MD_String8 filename;
     MD_String8 file_contents;
+    MD_NodeTable namespace_table;
+    MD_Node *selected_namespace;
 };
 
 typedef struct MD_ParseResult MD_ParseResult;
diff --git a/source/md_impl.c b/source/md_impl.c
index 7d25ce9..088ffba 100644
--- a/source/md_impl.c
+++ b/source/md_impl.c
@@ -642,6 +642,7 @@ MD_StringFromNodeKind(MD_NodeKind kind)
     {
         "Nil",
         "File",
+        "Namespace",
         "Label",
         "Tag",
     };
@@ -1420,13 +1421,46 @@ _MD_ParseOneNode(MD_ParseCtx *ctx)
     MD_Node *last_tag = 0;
     _MD_ParseTagList(ctx, &first_tag, &last_tag);
     
-    // NOTE(rjf): Unnamed Sets
     MD_TokenGroups skip_groups = MD_TokenGroup_Whitespace|MD_TokenGroup_Comment;
     MD_Token next_token = MD_Parse_PeekSkipSome(ctx, skip_groups);
-    if((MD_Parse_TokenMatch(next_token, MD_S8Lit("("), 0) ||
-        MD_Parse_TokenMatch(next_token, MD_S8Lit("{"), 0) ||
-        MD_Parse_TokenMatch(next_token, MD_S8Lit("["), 0)) &&
-       next_token.kind == MD_TokenKind_Symbol )
+    
+    // NOTE(rjf): #-things (just namespaces right now, but can be used for other such
+    // 'directives' in the future maybe)
+    if(MD_Parse_Require(ctx, MD_S8Lit("#"), MD_TokenKind_Symbol))
+    {
+        // NOTE(rjf): Namespaces
+        if(MD_Parse_Require(ctx, MD_S8Lit("namespace"), MD_TokenKind_Identifier))
+        {
+            if(MD_Parse_RequireKind(ctx, MD_TokenKind_Identifier, &token))
+            {
+                MD_NodeTableSlot *existing_namespace_slot = MD_NodeTable_Lookup(&ctx->namespace_table, token.string);
+                if(existing_namespace_slot == 0)
+                {
+                    MD_Node *ns = _MD_MakeNodeFromString_Ctx(ctx, MD_NodeKind_Namespace, token.string);
+                    MD_NodeTable_Insert(&ctx->namespace_table, MD_NodeTableCollisionRule_Overwrite, token.string, ns);
+                }
+                ctx->selected_namespace = existing_namespace_slot->node;
+                goto end_parse;
+            }
+            else
+            {
+                ctx->selected_namespace = 0;
+                goto end_parse;
+            }
+        }
+        
+        // NOTE(rjf): Not a valid hash thing
+        else
+        {
+            goto end_parse;
+        }
+    }
+    
+    // NOTE(rjf): Unnamed Sets
+    else if((MD_Parse_TokenMatch(next_token, MD_S8Lit("("), 0) ||
+             MD_Parse_TokenMatch(next_token, MD_S8Lit("{"), 0) ||
+             MD_Parse_TokenMatch(next_token, MD_S8Lit("["), 0)) &&
+            next_token.kind == MD_TokenKind_Symbol )
     {
         result.node = _MD_MakeNodeFromString_Ctx(ctx, MD_NodeKind_Label, MD_S8Lit(""));
         _MD_ParseSet(ctx, result.node,