Cool.trim, Str.words, run words.t

rakudo · Aug 8, 2011 · d601bb0 · d601bb0
1 parent b6e553a
commit d601bb0
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 1 deletion.
diff --git a/src/core/Cool.pm b/src/core/Cool.pm
@@ -109,6 +109,9 @@ my class Cool {
     method samecase(Cool:D: Cool $pattern) { self.Stringy.samecase($pattern) }
 
     method IO() { IO.new(:path(self)) }
+    method trim         () { self.Stringy.trim          };
+    method trim-leading () { self.Stringy.trim-leading  };
+    method trim-trailing() { self.Stringy.trim-trailing };
 }
 
 sub chop($s)                  { $s.chop }

diff --git a/src/core/Str.pm b/src/core/Str.pm
@@ -421,6 +421,10 @@ my class Str does Stringy {
     method trim(Str:D:) {
         self.trim-leading.trim-trailing;
     }
+
+    method words(Str:D: Int $limit = *) {
+        self.comb( / \S+ /, $limit );
+    }
 }
 
 

diff --git a/t/spectest.data b/t/spectest.data
@@ -564,7 +564,7 @@ S32-str/trim.t
 S32-str/uc.t                                               # icu
 S32-str/ucfirst.t                                          # icu
 # S32-str/unpack.t # err: Default constructor only takes named arguments
-# S32-str/words.t # err: Method 'words' not found for invocant of class 'Str' #icu
+S32-str/words.t
 # S32-temporal/calendar.t # err: Could not find sub &Date
 # S32-temporal/Date.t # err: Could not find sub &Date
 # S32-temporal/DateTime.t # err: Could not find sub &DateTime