sub new_node {
    my ($kind, @args) = @_;
    do {
        no strict 'refs';
        my $class = "Erlang::Parser::Node::$kind";
        &{"${class}::new"}($class, @args)
    }
}