Fix Capture.WHICH for subclasses of Capture

Subclasses' WHICH would be identical to a Capture's WHICH if their contents are identical.
rakudo · Mar 31, 2020 · 8808401 · 8808401
1 parent 5baa645
commit 8808401
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/src/core.c/Capture.pm6 b/src/core.c/Capture.pm6
@@ -16,9 +16,7 @@ my class Capture { # declared in BOOTSTRAP
     }
 
     multi method WHICH (Capture:D: --> ValueObjAt:D) {
-        my str $WHICH = nqp::istype(self.WHAT,Capture)
-          ?? 'Capture'
-          !! self.^name;
+        my str $WHICH = nqp::eqaddr(self.WHAT,Capture) ?? 'Capture' !! self.^name;
         if !nqp::isnull(@!list) && @!list {
             $WHICH ~= '|';
             for nqp::hllize(@!list) -> \elem {