summaryrefslogtreecommitdiff
path: root/main.ha
diff options
context:
space:
mode:
Diffstat (limited to 'main.ha')
-rw-r--r--main.ha6
1 files changed, 5 insertions, 1 deletions
diff --git a/main.ha b/main.ha
index e1c9e74..c8e5c65 100644
--- a/main.ha
+++ b/main.ha
@@ -1,4 +1,5 @@
use fmt;
+use os;
use strings;
let bf: Brainfuck = Brainfuck {
@@ -7,8 +8,11 @@ let bf: Brainfuck = Brainfuck {
};
export fn main() void = {
- const buf = drain_stdin();
+ if (len(os::args) != 2)
+ fmt::fatal("usage: hare-brainfuck <source>");
+ const buf = drain(os::args[1]);
defer free(buf);
const buf = optimize(buf);
+ fmt::println("optimized source", strings::fromutf8(buf)!)!;
exec(&bf, buf);
};