Add `cond` conditionals

1 files changed, 23 insertions, 0 deletions

diff --git a/src/main.c b/src/main.c
index f73c7cc..68ad857 100644
--- a/src/main.c
+++ b/src/main.c
@@ -641,6 +641,28 @@ parse_keyword(Parser *parser) {
                 array_push(node->struct_field, field, parser->storage);
             }
         } break;
+        case TOK_COND: {
+            node = node_alloc(parser, NODE_COND, prev);
+            if (!node) return;
+            parse_consume(parser, TOK_LCURLY,
+                          cstr("expected '{' on cond expression"));
+            while (!parse_match(parser, TOK_RCURLY) && !parser->panic) {
+                Node *tmp = node_alloc(parser, NODE_CASE, parser->previous);
+                if (!tmp) return;
+                // Are we on the default case.
+                if (!parse_match(parser, TOK_ELSE)) {
+                    parse_consume(parser, TOK_CASE,
+                                  cstr("expected case statement"));
+                    parse_expr(parser, PREC_LOW);
+                    tmp->case_value = array_pop(parser->nodes);
+                }
+                parse_consume(parser, TOK_ASSIGN,
+                              cstr("malformed case statement"));
+                parse_expr(parser, PREC_LOW);
+                tmp->case_expr = array_pop(parser->nodes);
+                array_push(node->match_cases, tmp, parser->storage);
+            }
+        } break;
         default: return;  // Unreachable.
     }
     array_push(parser->nodes, node, parser->storage);
@@ -847,6 +869,7 @@ graph_node(Node *node) {
     println("\"];");
 
     switch (node->kind) {
+        case NODE_COND:
         case NODE_MATCH: {
             if (node->match_expr) {
                 println("%d:e->%d:w;", node->id, node->match_expr->id);