#!/usr/bin/env perl6
use v6;
use _007;

sub run_007($program) {
    my $runtime = _007.runtime;
    my $ast = _007.parser(:$runtime).parse($program);
    $runtime.run($ast);
}

multi MAIN($path) {
    run_007(slurp($path));
}

multi MAIN(Str :e($program)!) {
    run_007($program);
}
