Add words method to Allomorph (#5107)

This fixes the presumption that .words is like .comb(/ \S+ /).
rakudo · Nov 23, 2022 · 59a3485 · 59a3485
1 parent 17062c3
commit 59a3485
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core.c/allomorphs.pm6 b/src/core.c/allomorphs.pm6
@@ -12,6 +12,10 @@ my class Allomorph is Str {
     method succ(Allomorph:D:) { self.Numeric.succ }
     method pred(Allomorph:D:) { self.Numeric.pred }
 
+    method words(Allomorph:D: |c) {
+        nqp::getattr_s(self,Str,'$!value').words(|c)
+    }
+
     method comb(Allomorph:D: |c) {
         nqp::getattr_s(self,Str,'$!value').comb(|c)
     }