added patch to generate PPDEF(pp_foo)

	Message-Id: <199807070043.UAA28572@monk.mps.ohio-state.edu>
	Subject: [PATCH 5.004_70] Autogenerate declarations for opcodes

p4raw-id: //depot/perl@1370

1 files changed, 9 insertions, 0 deletions

diff --git a/opcode.pl b/opcode.pl
index 5891139a44..8fa6e29173 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -207,6 +207,15 @@ print <<END;
 #endif
 END
 
+close OC or die "Error closing opcode.h: $!";
+
+open PP, '>pp_proto.h' or die "Error creating pp_proto.h: $!";
+for (@ops) {
+    print PP "PPDEF(pp_$_)\n";
+}
+
+close PP or die "Error closing pp_proto.h: $!";
+
 ###########################################################################
 sub tab {
     local($l, $t) = @_;