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

(suggested by Hugo van der Sanden)

p4raw-id: //depot/perl@3633

diff --git a/opcode.h b/opcode.h
index 80506b3..5f4acf5 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1,3 +1,8 @@
+/* !!!!!!!   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

diff --git a/opcode.pl b/opcode.pl
index 3718292..cd0c7eb 100755 (executable)
--- 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";

diff --git a/pp.sym b/pp.sym
index 1d8513a..a678388 100644 (file)
--- a/pp.sym
+++ b/pp.sym
@@ -1,3 +1,9 @@
+#
+# !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+#   This file is built by opcode.pl from its data.  Any changes made here
+#   will be lost!
+#
+
 Perl_ck_anoncode
 Perl_ck_bitop
 Perl_ck_concat

diff --git a/pp_proto.h b/pp_proto.h
index 7f253d7..efac700 100644 (file)
--- a/pp_proto.h
+++ b/pp_proto.h
@@ -1,3 +1,8 @@
+/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
+   This file is built by opcode.pl from its data.  Any changes made here
+   will be lost!
+*/
+
 PERL_CKDEF(Perl_ck_anoncode)
 PERL_CKDEF(Perl_ck_bitop)
 PERL_CKDEF(Perl_ck_concat)