This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mktables: Add comment to gen'd data file
authorKarl Williamson <public@khwilliamson.com>
Mon, 18 Jun 2012 18:37:52 +0000 (12:37 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 2 Aug 2012 15:24:52 +0000 (09:24 -0600)
lib/unicore/mktables

index 85668dd..5b49f00 100644 (file)
@@ -11495,6 +11495,11 @@ sub filter_old_style_case_folding {
                            Fate => $INTERNAL_ONLY,
                            Description => "Code points that particpate in a multi-char fold and are not the final character of said fold",
                            );
+        $non_final_folds->add_comment(<<END
+Note that this is not a closure.  'f' is in the list, but not things that fold
+singly to 'f', namely 'F'
+END
+        );
         $all_folds = $perl->add_match_table("_Perl_Any_Folds",
                            Perl_Extension => 1,
                            Fate => $INTERNAL_ONLY,