diff options
author | Nicholas Clark <nick@ccl4.org> | 2011-01-24 11:06:50 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2011-01-24 11:13:21 +0000 |
commit | f133ac5ddfc5d70fa61dd22a319c90b6c5016bc0 (patch) | |
tree | 084781d3bbe1ee1ec6177e934eaea361b6bf103d /keywords.c | |
parent | 26ea9e123d12cb8db56e9e161eaec98bd295b821 (diff) | |
download | perl-f133ac5ddfc5d70fa61dd22a319c90b6c5016bc0.tar.gz |
Merge perl_keyword.pl into regen/keywords.pl, to generate keywords.[ch]
Prepend + or - in front of all the keyword names in __DATA__ to mark weak and
strong keywords, needed for keyword.c
As keywords.c needs Devel::Tokenizer::C 0.05, not a core module (and not a
common module either) we can no longer run it as part of regen.pl. So store
the sha256 of the source in the generated files, and use this in to check that
they are not stale (in t/porting/regen.t)
Diffstat (limited to 'keywords.c')
-rw-r--r-- | keywords.c | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/keywords.c b/keywords.c index 199eaedf68..61bfc69e76 100644 --- a/keywords.c +++ b/keywords.c @@ -1,5 +1,7 @@ -/* - * The following code was generated by perl_keyword.pl. +/* -*- buffer-read-only: t -*- + * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + * This file is built by regen/keywords.pl from its data. + * Any changes made here will be lost! */ #include "EXTERN.h" @@ -10,9 +12,9 @@ I32 Perl_keyword (pTHX_ const char *name, I32 len, bool all_keywords) { - dVAR; + dVAR; - PERL_ARGS_ASSERT_KEYWORD; + PERL_ARGS_ASSERT_KEYWORD; switch (len) { @@ -3395,3 +3397,7 @@ Perl_keyword (pTHX_ const char *name, I32 len, bool all_keywords) unknown: return 0; } + +/* Generated from: + * 28d95638560707fb8bee100dab74c90107c3e000f635e3bd310d4e2501d3b073 regen/keywords.pl + * ex: set ro: */ |