Don't try to compile-time analyze dispatches involving generic types.

rakudo · Sep 28, 2011 · b7316c1 · b7316c1
1 parent f80dca3
commit b7316c1
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/Perl6/Optimizer.pm b/src/Perl6/Optimizer.pm
@@ -139,6 +139,9 @@ class Perl6::Optimizer {
                             if pir::isa($type, 'Undef') {
                                 $possible := 0;
                             }
+                            elsif $type.HOW.archetypes.generic {
+                                $possible := 0;
+                            }
                             else {
                                 my $prim := pir::repr_get_primitive_type_spec__IP($type);
                                 @types.push($type);