Dave noticed that change 28022 was wrong - should read is_index

[perl5.git] / utfebcdic.h

diff --git a/utfebcdic.h b/utfebcdic.h
index 7d03608..bdc1359 100644 (file)
--- a/utfebcdic.h
+++ b/utfebcdic.h
@@ -357,8 +357,8 @@ END_EXTERN_C
 /*
  * Note: we should try and be careful never to call the isXXX_utf8() functions
  * unless we're pretty sure we've seen the beginning of a UTF-EBCDIC character
- * Otherwise we risk loading in the heavy-duty SWASHINIT and SWASHGET routines
- * unnecessarily.
+ * Otherwise we risk loading in the heavy-duty swash_init and swash_fetch
+ * routines unnecessarily.
  */
 
 #define isIDFIRST_lazy_if(p,c) ((IN_BYTES || (!c || UTF8_IS_INVARIANT(*p))) \