Eliminate a couple of mentions of PAST from HLL::Compiler.

Raku · Sep 2, 2012 · 211d5b3 · 211d5b3
1 parent dd2cd29
commit 211d5b3
Showing 1 changed file with 3 additions and 9 deletions.
diff --git a/src/HLL/Compiler.pm b/src/HLL/Compiler.pm
@@ -428,20 +428,14 @@ class HLL::Compiler {
     method past($source, *%adverbs) {
         my $ast := $source.ast();
         self.panic("Unable to obtain ast from " ~ pir::typeof__SP($source))
-            unless $ast ~~ PAST::Node || $ast ~~ QAST::Node;
+            unless $ast ~~ QAST::Node;
         $ast;
     }
 
     method post($source, *%adverbs) {
         my $*PASTCOMPILER := pir::compreg__Ps('PAST');
-        if $source ~~ PAST::Node {
-            my $*PIRT := 0;
-            $*PASTCOMPILER.to_post($source, |%adverbs)
-        }
-        else {
-            my $*PIRT := 1;
-            QAST::Compiler.as_post($source)
-        }
+        my $*PIRT := 1;
+        QAST::Compiler.as_post($source)
     }
 
     method pirbegin() {