my $class = "Erlang::Parser::Node::$type";
$class->new(@args)

##</code><code>##

"Erlang::Parser::Node::$type"->new(@args)

##</code><code>##

sub new_node {
   my $kind = shift;
   return "Erlang::Parser::Node::$kind"->new(@_);
}