X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=regcomp.pl;h=e7a9d0588c3ef0f8d0b757d6777fb6260f9b1b17;hb=06c0cc96ebd866767a6d107ed78967600f7e0395;hp=225882a576274d605450294cc181123d6e7e63d0;hpb=36bb303b6ac55df9c2780b48d374c505374dc378;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/regcomp.pl b/regcomp.pl
index 225882a..e7a9d05 100644
--- a/regcomp.pl
+++ b/regcomp.pl
@@ -1,6 +1,6 @@
 BEGIN {
     # Get function prototypes
-    require 'regen.pl';
+    require 'regen_lib.pl';
 }
 #use Fatal qw(open close rename chmod unlink);
 open DESC, 'regcomp.sym';
@@ -22,9 +22,11 @@ $tmp_h = 'tmp_reg.h';
 unlink $tmp_h if -f $tmp_h;
 
 open OUT, ">$tmp_h";
+binmode OUT;
 
 print OUT <<EOP;
-/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
+/* -*- buffer-read-only: t -*-
+   !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
    This file is built by regcomp.pl from regcomp.sym.
    Any changes made here will be lost!
 */
@@ -114,6 +116,7 @@ static const int reg_num = $tot;
 #endif /* DEBUGGING */
 #endif /* REG_COMP_C */
 
+/* ex: set ro: */
 EOP
 
 close OUT or die "close $tmp_h: $!";