Attachment: binshuKZzIEr8.bin
Description:

Index: src/classes/Str.pir
===================================================================
--- src/classes/Str.pir	(revision 24949)
+++ src/classes/Str.pir	(working copy)
@@ -21,6 +21,11 @@
     $P0('Perl6Str', 'Str')
 .end
 
+.sub 'chars' :method
+    $S0 = self
+    $I0 = length $S0
+    .return ($I0)
+.end
 
 .sub 'ACCEPTS' :method
     .param string topic

Reply via email to