summaryrefslogtreecommitdiff
path: root/cmd/hs/hs.ha
diff options
context:
space:
mode:
Diffstat (limited to 'cmd/hs/hs.ha')
-rw-r--r--cmd/hs/hs.ha9
1 files changed, 9 insertions, 0 deletions
diff --git a/cmd/hs/hs.ha b/cmd/hs/hs.ha
index 758ad62..c0ad72f 100644
--- a/cmd/hs/hs.ha
+++ b/cmd/hs/hs.ha
@@ -40,6 +40,15 @@ export fn main() void = {
fmt::printfln("{}: {}", var.0, var.1)!;
};
+ let ast = parser::parse(&p);
+ let ast = match (ast) {
+ case let a: parser::ast =>
+ yield a;
+ case let e: parser::error =>
+ fmt::fatal(parser::strerror(e));
+ };
+ interpreter::interpret(&it, ast);
+
//let tk = parsetoken(&p);
//fmt::printfln("tk value: {}\ntk type: {}", tk.value, parser::strtktype(tk.tktype))!;
//tk = parsetoken(&p);