Add the drafts of the two posts

code/compiler_ast.hpp

@@ -0,0 +1,76 @@
+#pragma once
+#include <memory>
+#include <vector>
+
+struct ast {
+    virtual ~ast();
+};
+
+using ast_ptr = std::unique_ptr<ast>;
+
+struct pattern {
+    virtual ~pattern();
+};
+
+struct pattern_var : public pattern {
+    std::string var;
+
+    pattern_var(const char* v)
+        : var(v) {}
+};
+
+struct pattern_constr : public pattern {
+    std::string constr;
+    std::vector<std::string> params;
+
+    pattern_constr(const char* c, std::vector<std::string>&& p)
+        : constr(c) {
+        std::swap(params, p);
+    }
+};
+
+using pattern_ptr = std::unique_ptr<pattern>;
+
+struct branch {
+    pattern_ptr pat;
+    ast_ptr expr;
+
+    branch(pattern_ptr&& p, ast_ptr&& a)
+        : pat(std::move(p)), expr(std::move(a)) {}
+};
+
+using branch_ptr = std::unique_ptr<branch>;
+
+enum binop {
+    PLUS,
+    MINUS,
+    TIMES,
+    DIVIDE
+};
+
+struct ast_binop : public ast {
+    binop op;  
+    ast_ptr left;
+    ast_ptr right;
+
+    ast_binop(binop o, ast_ptr&& l, ast_ptr&& r)
+        : op(o), left(std::move(l)), right(std::move(r)) {}
+};
+
+struct ast_app : public ast {
+    ast_ptr left;
+    ast_ptr right;
+
+    ast_app(ast* l, ast* r)
+        : left(l), right(r) {}
+};
+
+struct ast_case : public ast {
+    ast_ptr of;
+    std::vector<branch_ptr> branches;
+
+    ast_case(ast_ptr&& o, std::vector<branch_ptr>&& b)
+        : of(std::move(o)) {
+        std::swap(branches, b);
+    }
+};

code/compiler_parser.y

@@ -0,0 +1,26 @@
+%{
+#include <string>
+#include <iostream>
+#include "ast.hpp"
+#include "parser.hpp"
+%}
+
+%token PLUS
+%token TIMES
+%token MINUS
+%token DIVIDE
+%token INT
+%token DEFN
+%token DATA
+%token CASE
+%token OF
+%token OCURLY
+%token CCURLY
+%token OPAREN
+%token CPAREN
+%token COMMA
+%token ARROW
+%token EQUA
+%token LID
+%token UID
+

code/compiler_scanner.l

@@ -0,0 +1,33 @@
+%option noyywrap
+
+%{
+#include <iostream>
+%}
+
+%%
+
+[ \n]+ {}
+\+ { std::cout << "PLUS" << std::endl; }
+\* { std::cout << "TIMES" << std::endl; }
+- { std::cout << "MINUS" << std::endl; }
+\/ { std::cout << "DIVIDE" << std::endl; }
+[0-9]+ { std::cout << "NUMBER: " << yytext << std::endl; }
+defn { std::cout << "KEYWORD: defn" << std::endl; }
+data { std::cout << "KEYWORD: data" << std::endl; }
+case { std::cout << "KEYWORD: case" << std::endl; }
+of { std::cout << "KEYWORD: of" << std::endl; }
+\{ { std::cout << "OPEN CURLY" << std::endl; }
+\} { std::cout << "CLOSED CURLY" << std::endl; }
+\( { std::cout << "OPEN PARENTH" << std::endl; }
+\) { std::cout << "CLOSE PARENTH" << std::endl; }
+,  { std::cout << "COMMA" << std::endl; }
+-> { std::cout << "PATTERN ARROW" << std::endl; }
+= { std::cout << "EQUAL" << std::endl; }
+[a-z][a-zA-Z]* { std::cout << "LOWERCASE IDENTIFIER: " << yytext << std::endl; }
+[A-Z][a-zA-Z]* { std::cout << "UPPERCASE IDENTIFIER: " << yytext << std::endl; }
+
+%%
+
+int main() {
+    yylex();
+}