From fbe6f3cfe96af50ec0bf4a6c1748bf45042d07d5 Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Sat, 14 May 2011 10:07:37 -0600 Subject: [PATCH] utf8_heavy: Add comments --- lib/utf8_heavy.pl | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lib/utf8_heavy.pl b/lib/utf8_heavy.pl index b3a3a36..b744b3b 100644 --- a/lib/utf8_heavy.pl +++ b/lib/utf8_heavy.pl @@ -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; -- 2.7.4