This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regen/mk_invlists.pl: uni_keywords.c no longer exists
authorKarl Williamson <khw@cpan.org>
Fri, 20 Apr 2018 16:59:40 +0000 (10:59 -0600)
committerKarl Williamson <khw@cpan.org>
Mon, 25 Jun 2018 13:33:27 +0000 (07:33 -0600)
So no need to do an #ifdef for it.

charclass_invlists.h
regen/mk_invlists.pl
uni_keywords.h

index 3603c52..3ce7a0d 100644 (file)
@@ -372227,10 +372227,6 @@ const char * deprecated_property_msgs[] = {
        "Supplanted by Line_Break property values; see www.unicode.org/reports/tr14"
 };
 
-#endif /* defined(PERL_IN_UTF8_C) */
-
-#if defined(PERL_IN_UNI_KEYWORDS_C) || defined(PERL_IN_UTF8_C)
-
 #define PL_HYPHEN (PL_HYPHEN_perl_aux + (MAX_UNI_KEYWORD_INDEX * 2))
 #define PL_LB__SG (PL_LB__SG_perl_aux + (MAX_UNI_KEYWORD_INDEX * 1))
 
@@ -373352,10 +373348,6 @@ typedef enum {
 
 #define MAX_UNI_KEYWORD_INDEX PL__PERL_QUOTEMETA
 
-#endif /* defined(PERL_IN_UNI_KEYWORDS_C) || defined(PERL_IN_UTF8_C) */
-
-#if defined(PERL_IN_UTF8_C)
-
 static const UV * const PL_uni_prop_ptrs[] = {
        NULL,   /* Placeholder */
        PL_ADLM_invlist,
@@ -374653,5 +374645,5 @@ static const U8 WB_table[24][24] = {
  * 21653d2744fdd071f9ef138c805393901bb9547cf3e777ebf50215a191f986ea lib/unicore/version
  * 913d2f93f3cb6cdf1664db888bf840bc4eb074eef824e082fceda24a9445e60c regen/charset_translations.pl
  * 03e51b0f07beebd5da62ab943899aa4934eee1f792fa27c1fb638c33bf4ac6ea regen/mk_PL_charclass.pl
- * 60fbfb560ee8628828613c067f2a9e26fb051a009608f69b6a6b361edbdd2bab regen/mk_invlists.pl
+ * 232d95d2479300926c29d5ed849bcec7d02f36f80f06578849584a064a0cc967 regen/mk_invlists.pl
  * ex: set ro: */
index 24c5e4f..a5eecae 100644 (file)
@@ -2668,9 +2668,7 @@ print $out_fh "\nconst char * deprecated_property_msgs[] = {\n\t";
 print $out_fh join ",\n\t", map { "\"$_\"" } @deprecated_messages;
 print $out_fh "\n};\n";
 
-switch_pound_if ('binary_property_tables', [ 'PERL_IN_UTF8_C',
-                                             'PERL_IN_UNI_KEYWORDS_C',
-                                            ]);
+switch_pound_if ('binary_property_tables', 'PERL_IN_UTF8_C');
 
 my @enums = sort values %enums;
 
index 712bc94..3c0c8a9 100644 (file)
@@ -6758,6 +6758,6 @@ MPH_VALt match_uniprop( const unsigned char * const key, const U16 key_len ) {
  * 21653d2744fdd071f9ef138c805393901bb9547cf3e777ebf50215a191f986ea lib/unicore/version
  * 913d2f93f3cb6cdf1664db888bf840bc4eb074eef824e082fceda24a9445e60c regen/charset_translations.pl
  * 03e51b0f07beebd5da62ab943899aa4934eee1f792fa27c1fb638c33bf4ac6ea regen/mk_PL_charclass.pl
- * 60fbfb560ee8628828613c067f2a9e26fb051a009608f69b6a6b361edbdd2bab regen/mk_invlists.pl
+ * 232d95d2479300926c29d5ed849bcec7d02f36f80f06578849584a064a0cc967 regen/mk_invlists.pl
  * 784929499a354028e04efcff331847d420beeca7f3f4f22569b59ec160924b72 regen/mph.pl
  * ex: set ro: */