summaryrefslogtreecommitdiff
path: root/regen/regcharclass.pl
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2014-02-27 10:25:24 -0700
committerKarl Williamson <public@khwilliamson.com>2014-03-01 20:12:16 -0700
commit212b6c86be666c7384a2e575c35f1dd968a1ddb4 (patch)
treee864545287501ca08fe78e0d00486d5101018140 /regen/regcharclass.pl
parent147f7004ad992729d7466a9b2229332c1b97ca3a (diff)
downloadperl-212b6c86be666c7384a2e575c35f1dd968a1ddb4.tar.gz
regen/regcharclass.pl: Warn that macros are internal only
This adds a comment to the generated file that the macros are not to be generally used.
Diffstat (limited to 'regen/regcharclass.pl')
-rwxr-xr-xregen/regcharclass.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl
index 300cd014a4..1902ad3a74 100755
--- a/regen/regcharclass.pl
+++ b/regen/regcharclass.pl
@@ -1238,7 +1238,12 @@ if ( !caller ) {
}
print $out_fh read_only_top( lang => 'C', by => $0,
file => 'regcharclass.h', style => '*',
- copyright => [2007, 2011] );
+ copyright => [2007, 2011],
+ final => <<EOF,
+WARNING: These macros are for internal Perl core use only, and may be
+changed or removed without notice.
+EOF
+ );
print $out_fh "\n#ifndef H_REGCHARCLASS /* Guard against nested #includes */\n#define H_REGCHARCLASS 1\n\n";
my ( $op, $title, @txt, @types, %mods );