This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Reword the "threads still running" cleanup message.
[perl5.git]
/
keywords.pl
diff --git
a/keywords.pl
b/keywords.pl
index
acdf807
..
00c067c
100755
(executable)
--- a/
keywords.pl
+++ b/
keywords.pl
@@
-4,6
+4,18
@@
unlink "keywords.h";
open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
select KW;
open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
select KW;
+print <<EOM;
+/*
+ * keywords.h
+ *
+ * Copyright (c) 1997-2002, Larry Wall
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Artistic License, as specified in the README file.
+ *
+ */
+EOM
+
# Read & print data.
$keynum = 0;
# Read & print data.
$keynum = 0;
@@
-35,14
+47,8
@@
BEGIN
CORE
DESTROY
END
CORE
DESTROY
END
-EQ
-GE
-GT
INIT
INIT
-LE
-LT
-NE
-STOP
+CHECK
abs
accept
alarm
abs
accept
alarm