This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
utf8_heavy: Add comments
authorKarl Williamson <public@khwilliamson.com>
Sat, 14 May 2011 16:07:37 +0000 (10:07 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 19 May 2011 16:31:20 +0000 (10:31 -0600)
lib/utf8_heavy.pl

index b3a3a36..b744b3b 100644 (file)
@@ -70,6 +70,10 @@ sub croak { require Carp; Carp::croak(@_) }
         ## info we need. Were this to be a subroutine, the 'last' would just
         ## be a 'return'.
         ##
+        #   If a problem is found $type is returned;
+        #   Upon success, a new (or cached) blessed object is returned with
+        #   keys TYPE, BITS, EXTRAS, LIST, and NONE with values having the
+        #   same meanings as the input parameters.
         my $file; ## file to load data from, and also part of the %Cache key.
         my $ListSorted = 0;