utf8.c: Remove soon-to-be-obsoleted comment
authorKarl Williamson <public@khwilliamson.com>
Thu, 12 May 2011 03:13:30 +0000 (21:13 -0600)
committerKarl Williamson <public@khwilliamson.com>
Thu, 19 May 2011 16:31:20 +0000 (10:31 -0600)
This comment will no longer apply, as the code it talked about is
moving into swash_init().

utf8.c

diff --git a/utf8.c b/utf8.c
index 603ad3f..6bb3327 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -1853,22 +1853,6 @@ Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp,
 
     if (!*swashp) /* load on-demand */
          *swashp = swash_init("utf8", normal, &PL_sv_undef, 4, 0);
-    /* This is the beginnings of a skeleton of code to read the info section
-     * that is in all the swashes in case we ever want to do that, so one can
-     * read things whose maps aren't code points, and whose default if missing
-     * is not to the code point itself.  This was just to see if it actually
-     * worked.  Details on what the possibilities are are in perluniprops.pod
-       HV * const hv = get_hv("utf8::SwashInfo", 0);
-       if (hv) {
-        SV **svp;
-        svp = hv_fetch(hv, (const char*)normal, strlen(normal), FALSE);
-            const char *s;
-
-             HV * const this_hash = SvRV(*svp);
-               svp = hv_fetch(this_hash, "type", strlen("type"), FALSE);
-             s = SvPV_const(*svp, len);
-       }
-    }*/
 
     if (special) {
          /* It might be "special" (sometimes, but not always,