make Niecz::Compiler use named arguments

sorear · Jan 2, 2011 · eb2e337 · eb2e337
1 parent 8f0056c
commit eb2e337
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/niecza b/niecza
@@ -23,6 +23,6 @@ my $compiler = Niecza::Compiler->new(
     backend => $backend
 );
 
-$compiler->compile('1','foo.p6','file.nam');
+$compiler->compile(source=>'1',filename=>'foo.p6',output=>'file.nam');
 
 
diff --git a/src/Niecza/Compiler.pm b/src/Niecza/Compiler.pm
@@ -4,11 +4,11 @@ has frontend => (is=>'ro');
 has passes  => (is=>'ro');
 has backend => (is=>'ro');
 sub compile {
-    my ($self,$input,$filename,$output) = @_;
-    my $ast = $self->frontend->parse($input,$filename);
+    my ($self,%args) = @_;
+    my $ast = $self->frontend->parse($args{source},$args{filename});
     for my $pass (@{$self->passes}) {
         $ast = $pass->invoke($ast);
     }
-    $self->backend->compile($ast,$output);
+    $self->backend->compile($ast,$args{output});
 }
 1;