diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-08-18 22:19:25 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-24 23:38:27 -0700 |
commit | c2f605db621edfb16309200bbba8ced984d34476 (patch) | |
tree | cff01a54d0de63402bdd6d7644d45e67f76d9992 /keywords.h | |
parent | 1e4b6aa1907f271ce023ffe6f03439e2ce7f65dc (diff) | |
download | perl-c2f605db621edfb16309200bbba8ced984d34476.tar.gz |
Simplify the CORE::__FOO__ op-generation code
It just happens that the (caller)[...] offsets for file and line are
the same as the keyword numbers. KEY___PACKAGE__ is 3 and (caller)[0]
returns the package, so keyword_number % 3 can be used for the offset
instead of an unwieldy switch block.
Diffstat (limited to 'keywords.h')
-rw-r--r-- | keywords.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/keywords.h b/keywords.h index 4631b671e0..83ad0efb56 100644 --- a/keywords.h +++ b/keywords.h @@ -268,5 +268,5 @@ #define KEY_y 252 /* Generated from: - * 34be1269b3c67c86c758c60794ddba6eadc528e0435f954d514c14a2f1c73a2e regen/keywords.pl + * 6563b55da87af894b79ef9d777217633eee6c7b5f352ff4c17317f562247f5fc regen/keywords.pl * ex: set ro: */ |