add do-not-edit caveats for files generated by opcode.pl

(suggested by Hugo van der Sanden)

p4raw-id: //depot/perl@3633

1 files changed, 23 insertions, 0 deletions

diff --git a/opcode.pl b/opcode.pl
index 3718292315..cd0c7ebcb2 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -29,6 +29,11 @@ while (<DATA>) {
 
 $i = 0;
 print <<"END";
+/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+   This file is built by opcode.pl from its data.  Any changes made here
+   will be lost!
+*/
+
 #define Perl_pp_i_preinc Perl_pp_preinc
 #define Perl_pp_i_predec Perl_pp_predec
 #define Perl_pp_i_postinc Perl_pp_postinc
@@ -216,6 +221,24 @@ unlink "pp.sym";
 open PP, '>pp_proto.h' or die "Error creating pp_proto.h: $!";
 open PPSYM, '>pp.sym' or die "Error creating pp.sym: $!";
 
+print PP <<"END";
+/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+   This file is built by opcode.pl from its data.  Any changes made here
+   will be lost!
+*/
+
+END
+
+print PPSYM <<"END";
+#
+# !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+#   This file is built by opcode.pl from its data.  Any changes made here
+#   will be lost!
+#
+
+END
+
+
 for (sort keys %ckname) {
     print PP "PERL_CKDEF(Perl_$_)\n";
     print PPSYM "Perl_$_\n";