From b7eedb08953678c5b222f3776892756053dc00aa Mon Sep 17 00:00:00 2001 From: Lukas Mai Date: Thu, 23 Mar 2023 17:07:03 +0100 Subject: [PATCH] fix incorrect vi filetype declarations in generated files Vim's filetype declarations are case sensitive. The correct types for Perl, C, and Pod are perl, c, and pod, respectively. --- charclass_invlists.h | 2 +- ebcdic_tables.h | 2 +- embed.h | 2 +- embedvar.h | 2 +- feature.h | 2 +- l1_char_class_tab.h | 2 +- lib/.gitignore | 2 +- lib/B/Op_private.pm | 2 +- lib/feature.pm | 4 ++-- lib/overload/numbers.pm | 2 +- lib/unicore/uni_keywords.pl | 2 +- lib/warnings.pm | 4 ++-- mg_names.inc | 2 +- mg_raw.h | 2 +- mg_vtable.h | 2 +- miniperlmain.c | 2 +- opcode.h | 2 +- opnames.h | 2 +- overload.h | 2 +- overload.inc | 2 +- packsizetables.inc | 2 +- perly.act | 2 +- perly.h | 2 +- perly.tab | 2 +- pp_proto.h | 2 +- proto.h | 2 +- reentr.c | 2 +- reentr.h | 2 +- regcharclass.h | 2 +- regen/feature.pl | 2 +- regen/regen_lib.pl | 2 +- regen/warnings.pl | 2 +- regnodes.h | 2 +- scope_types.h | 2 +- uconfig.h | 2 +- uni_keywords.h | 2 +- unicode_constants.h | 2 +- warnings.h | 2 +- 38 files changed, 40 insertions(+), 40 deletions(-) diff --git a/charclass_invlists.h b/charclass_invlists.h index c62318673027..a9a843326f10 100644 --- a/charclass_invlists.h +++ b/charclass_invlists.h @@ -436083,4 +436083,4 @@ static const U8 WB_table[23][23] = { * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl * c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl * 2a64e8b4ca351f490530bdf8c7b4962c407b7ed6a1123eeb8d9e8e0e4236d16a regen/mk_invlists.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/ebcdic_tables.h b/ebcdic_tables.h index 44011b50d80c..fe0075920bf8 100644 --- a/ebcdic_tables.h +++ b/ebcdic_tables.h @@ -795,4 +795,4 @@ SOFTWARE. #endif /* PERL_EBCDIC_TABLES_H_ */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/embed.h b/embed.h index 989650fc3ce8..d7c7da459a25 100644 --- a/embed.h +++ b/embed.h @@ -2183,4 +2183,4 @@ # endif /* !defined(WIN32) */ #endif /* !defined(PERL_NO_SHORT_NAMES) */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/embedvar.h b/embedvar.h index 63d28a3a6e3d..3aba6d263a27 100644 --- a/embedvar.h +++ b/embedvar.h @@ -368,4 +368,4 @@ # endif /* !defined(PL_sawampersand) */ #endif /* defined(MULTIPLICITY) */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/feature.h b/feature.h index 63ab7a2c8f7a..c862864a063e 100644 --- a/feature.h +++ b/feature.h @@ -451,4 +451,4 @@ S_magic_sethint_feature(pTHX_ SV *keysv, const char *keypv, STRLEN keylen, #endif /* PERL_FEATURE_H_ */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/l1_char_class_tab.h b/l1_char_class_tab.h index d9885e4d68dd..01d77639171a 100644 --- a/l1_char_class_tab.h +++ b/l1_char_class_tab.h @@ -793,4 +793,4 @@ #endif /* EBCDIC 037 */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/lib/.gitignore b/lib/.gitignore index 2794c275a69c..92f14a7a6a32 100644 --- a/lib/.gitignore +++ b/lib/.gitignore @@ -229,4 +229,4 @@ /version.pod /version/ -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/lib/B/Op_private.pm b/lib/B/Op_private.pm index 51f7eb82c477..c582abaee86b 100644 --- a/lib/B/Op_private.pm +++ b/lib/B/Op_private.pm @@ -931,4 +931,4 @@ $ops_using{OPpTRANS_IDENTICAL} = $ops_using{OPpTRANS_CAN_FORCE_UTF8}; $ops_using{OPpTRANS_SQUASH} = $ops_using{OPpTRANS_CAN_FORCE_UTF8}; $ops_using{OPpTRANS_USE_SVOP} = $ops_using{OPpTRANS_CAN_FORCE_UTF8}; -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/lib/feature.pm b/lib/feature.pm index 7b614e17cff7..442522506876 100644 --- a/lib/feature.pm +++ b/lib/feature.pm @@ -4,7 +4,7 @@ # Any changes made here will be lost! package feature; -our $VERSION = '1.81'; +our $VERSION = '1.82'; our %feature = ( fc => 'feature_fc', @@ -1247,4 +1247,4 @@ sub feature_bundle { 1; -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/lib/overload/numbers.pm b/lib/overload/numbers.pm index db71405f08c4..9a6f457e529e 100644 --- a/lib/overload/numbers.pm +++ b/lib/overload/numbers.pm @@ -173,4 +173,4 @@ our @enums = qw# { my $i = 0; our %enums = map { $_ => $i++ } @enums } -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/lib/unicore/uni_keywords.pl b/lib/unicore/uni_keywords.pl index ee9c532dec91..288471d29e4b 100644 --- a/lib/unicore/uni_keywords.pl +++ b/lib/unicore/uni_keywords.pl @@ -1336,4 +1336,4 @@ # 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl # c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl # 2a64e8b4ca351f490530bdf8c7b4962c407b7ed6a1123eeb8d9e8e0e4236d16a regen/mk_invlists.pl -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/lib/warnings.pm b/lib/warnings.pm index b484bc4d4918..739b51a0ac56 100644 --- a/lib/warnings.pm +++ b/lib/warnings.pm @@ -5,7 +5,7 @@ package warnings; -our $VERSION = "1.63"; +our $VERSION = "1.64"; # Verify that we're called correctly so that warnings will work. # Can't use Carp, since Carp uses us! @@ -1492,4 +1492,4 @@ See also L and L. =cut -# ex: set ro ft=Perl: +# ex: set ro ft=perl: diff --git a/mg_names.inc b/mg_names.inc index 29338448ce46..c63c690f3410 100644 --- a/mg_names.inc +++ b/mg_names.inc @@ -55,4 +55,4 @@ { PERL_MAGIC_extvalue, "extvalue(^)" }, { PERL_MAGIC_ext, "ext(~)" }, -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/mg_raw.h b/mg_raw.h index 971906541294..eddcbf56637b 100644 --- a/mg_raw.h +++ b/mg_raw.h @@ -97,4 +97,4 @@ { '~', "magic_vtable_max | PERL_MAGIC_READONLY_ACCEPTABLE", "/* ext '~' Variable magic available for use by extensions */" }, -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/mg_vtable.h b/mg_vtable.h index a0273831bf73..80f265f8c2ee 100644 --- a/mg_vtable.h +++ b/mg_vtable.h @@ -256,4 +256,4 @@ EXT_MGVTBL PL_magic_vtables[magic_vtable_max]; #define PL_vtbl_uvar PL_magic_vtables[want_vtbl_uvar] #define PL_vtbl_vec PL_magic_vtables[want_vtbl_vec] -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/miniperlmain.c b/miniperlmain.c index 074fadc12a88..f8e0fd282dd1 100644 --- a/miniperlmain.c +++ b/miniperlmain.c @@ -161,4 +161,4 @@ xs_init(pTHX) PERL_UNUSED_CONTEXT; } -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/opcode.h b/opcode.h index 391e6ec9a52a..26a99dd415fc 100644 --- a/opcode.h +++ b/opcode.h @@ -3510,4 +3510,4 @@ END_EXTERN_C -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/opnames.h b/opnames.h index 3d827d4755ee..71601b8f41f3 100644 --- a/opnames.h +++ b/opnames.h @@ -464,4 +464,4 @@ typedef enum opcode { #define OP_IS_INFIX_BIT(op) \ ((op) >= OP_BIT_AND && (op) <= OP_SBIT_OR) -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/overload.h b/overload.h index 5f28c025d81f..cb2e9f1d022b 100644 --- a/overload.h +++ b/overload.h @@ -95,4 +95,4 @@ enum { #define NofAMmeth max_amg_code -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/overload.inc b/overload.inc index c7362bfad4d5..34c3fc0010e8 100644 --- a/overload.inc +++ b/overload.inc @@ -177,4 +177,4 @@ static const char * const PL_AMG_names[NofAMmeth] = { "(qr" }; -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/packsizetables.inc b/packsizetables.inc index e0427834aac3..b6f2723f3d9b 100644 --- a/packsizetables.inc +++ b/packsizetables.inc @@ -219,4 +219,4 @@ STATIC const packprops_t packprops[512] = { }; #endif -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/perly.act b/perly.act index 20ce3277b727..8c5acb19d6f4 100644 --- a/perly.act +++ b/perly.act @@ -2350,4 +2350,4 @@ case 2: /* Generated from: * 0a5fcd15cf0b7afb57ade6ceaf68037a38dd194acd9d60d3e4ad99c15233af75 perly.y * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/perly.h b/perly.h index 4eeec7ac5d4f..f2f378affef2 100644 --- a/perly.h +++ b/perly.h @@ -238,4 +238,4 @@ int yyparse (void); /* Generated from: * 0a5fcd15cf0b7afb57ade6ceaf68037a38dd194acd9d60d3e4ad99c15233af75 perly.y * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/perly.tab b/perly.tab index b0be16dc3564..1ca9c7dc8c0e 100644 --- a/perly.tab +++ b/perly.tab @@ -1330,4 +1330,4 @@ static const toketypes yy_type_tab[] = /* Generated from: * 0a5fcd15cf0b7afb57ade6ceaf68037a38dd194acd9d60d3e4ad99c15233af75 perly.y * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/pp_proto.h b/pp_proto.h index 2b98a8d1c3ab..a3a8f4551861 100644 --- a/pp_proto.h +++ b/pp_proto.h @@ -321,4 +321,4 @@ PERL_CALLCONV PP(pp_weaken) __attribute__visibility__("hidden"); PERL_CALLCONV PP(pp_xor) __attribute__visibility__("hidden"); PERL_CALLCONV PP(unimplemented_op) __attribute__visibility__("hidden"); -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/proto.h b/proto.h index 694a5fde6daa..909dccae90e0 100644 --- a/proto.h +++ b/proto.h @@ -10548,4 +10548,4 @@ Perl_do_exec3(pTHX_ const char *incmd, int fd, int do_report) #endif END_EXTERN_C -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/reentr.c b/reentr.c index 6a36ea7b67ce..8ada7f073475 100644 --- a/reentr.c +++ b/reentr.c @@ -677,4 +677,4 @@ Perl_reentrant_retry(const char *f, ...) return retptr; } -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/reentr.h b/reentr.h index 24407f381439..3d95027f7427 100644 --- a/reentr.h +++ b/reentr.h @@ -1697,4 +1697,4 @@ typedef struct { #endif -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/regcharclass.h b/regcharclass.h index c7132bece470..4d39ab2417b6 100644 --- a/regcharclass.h +++ b/regcharclass.h @@ -3855,4 +3855,4 @@ * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl * acc94e4afc339fe2cf2ae74d6e1cbcf2c396328d78e56236ad314eadbfc84125 regen/regcharclass.pl * b2f896452d2b30da3e04800f478c60c1fd0b03d6b668689b020f1e3cf1f1cdd9 regen/regcharclass_multi_char_folds.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/regen/feature.pl b/regen/feature.pl index 10073bea0296..aeb04edeb4f9 100755 --- a/regen/feature.pl +++ b/regen/feature.pl @@ -501,7 +501,7 @@ sub longest { __END__ package feature; -our $VERSION = '1.81'; +our $VERSION = '1.82'; FEATURES diff --git a/regen/regen_lib.pl b/regen/regen_lib.pl index 36ffa9ecfd0c..f5118577812a 100644 --- a/regen/regen_lib.pl +++ b/regen/regen_lib.pl @@ -203,7 +203,7 @@ sub read_only_bottom_close_and_rename { $comment .= "$digest $file\n"; } } - $comment .= "ex: set ro ft=$lang:"; + $comment .= "ex: set ro ft=\L$lang\E:"; if (defined $lang && $lang eq 'Perl') { $comment =~ s/^/# /mg; diff --git a/regen/warnings.pl b/regen/warnings.pl index 4b598bbc31d9..7b0c49a88389 100644 --- a/regen/warnings.pl +++ b/regen/warnings.pl @@ -16,7 +16,7 @@ # # This script is normally invoked from regen.pl. -$VERSION = '1.63'; +$VERSION = '1.64'; BEGIN { require './regen/regen_lib.pl'; diff --git a/regnodes.h b/regnodes.h index c4c7ba6a45c4..17a842258611 100644 --- a/regnodes.h +++ b/regnodes.h @@ -2977,4 +2977,4 @@ EXTCONST U32 PL_EXACT_REQ8_bitmask = 0x1E00; #endif /* defined(PERL_CORE) || defined(PERL_EXT_RE_BUILD) */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/scope_types.h b/scope_types.h index f100eb500841..6d31c116d23c 100644 --- a/scope_types.h +++ b/scope_types.h @@ -148,4 +148,4 @@ static const U8 leave_scope_arg_counts[] = { #define MAX_SAVEt 58 -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/uconfig.h b/uconfig.h index f6f428f11fea..892d74cafc2f 100644 --- a/uconfig.h +++ b/uconfig.h @@ -5378,4 +5378,4 @@ /* Generated from: * 8cb1765533e123c379f0207fc2a4f75df4be3e84be3a0da71ab37bcf00e13a46 config_h.SH * 9c5779a38fbba64b0a5dcf7ce548120a29ea5039350102827f500c812bda10b2 uconfig.sh - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/uni_keywords.h b/uni_keywords.h index cc5d49a8ec0d..b085493183c4 100644 --- a/uni_keywords.h +++ b/uni_keywords.h @@ -7762,4 +7762,4 @@ match_uniprop( const unsigned char * const key, const U16 key_len ) { * c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl * 2a64e8b4ca351f490530bdf8c7b4962c407b7ed6a1123eeb8d9e8e0e4236d16a regen/mk_invlists.pl * d6987e01ad538d1567394851cf199f99815f7701bebd6092be4bc7a6d8f147c6 regen/mph.pl - * ex: set ro ft=C: */ + * ex: set ro ft=c: */ diff --git a/unicode_constants.h b/unicode_constants.h index cc7e9539d488..07a02b300b28 100644 --- a/unicode_constants.h +++ b/unicode_constants.h @@ -242,4 +242,4 @@ bytes. #endif /* PERL_UNICODE_CONSTANTS_H_ */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */ diff --git a/warnings.h b/warnings.h index 50b105eebfc2..ce1765e98328 100644 --- a/warnings.h +++ b/warnings.h @@ -359,4 +359,4 @@ category parameters passed. /* end of file warnings.h */ -/* ex: set ro ft=C: */ +/* ex: set ro ft=c: */