diff options
author | Steffen Mueller <smueller@cpan.org> | 2011-02-06 17:57:21 +0100 |
---|---|---|
committer | Steffen Mueller <smueller@cpan.org> | 2011-07-12 20:53:49 +0200 |
commit | 7f3fd0eb47e125ade3d7955cd65843e44d3ff0f6 (patch) | |
tree | 85e36f9ba87da92c8802639171f6212ab07a170b /ext | |
parent | 9bd87162f76139f197cecacf0e5ff49148b5cf3f (diff) | |
download | perl-7f3fd0eb47e125ade3d7955cd65843e44d3ff0f6.tar.gz |
Revert "Moved prototype check to XS code, allowing the .pm file change from yesterday"
This reverts commit d16d4b10300b35e2d4d858a3e23cff975bc713fe. It
requires the _ prototype support in ExtUtils::ParseXS and we need to
temporarily disable that. Will be reapplied later.
Diffstat (limited to 'ext')
-rw-r--r-- | ext/I18N-Langinfo/Langinfo.pm | 6 | ||||
-rw-r--r-- | ext/I18N-Langinfo/Langinfo.xs | 3 |
2 files changed, 6 insertions, 3 deletions
diff --git a/ext/I18N-Langinfo/Langinfo.pm b/ext/I18N-Langinfo/Langinfo.pm index a3bf3b58e5..4bac102150 100644 --- a/ext/I18N-Langinfo/Langinfo.pm +++ b/ext/I18N-Langinfo/Langinfo.pm @@ -72,10 +72,14 @@ our @EXPORT_OK = qw( YESSTR ); -our $VERSION = '0.08'; +our $VERSION = '0.08_01'; XSLoader::load(); +sub langinfo(_) { + return internal_langinfo(shift); +} + 1; __END__ diff --git a/ext/I18N-Langinfo/Langinfo.xs b/ext/I18N-Langinfo/Langinfo.xs index 8b1fd5a4ef..f107d0e99a 100644 --- a/ext/I18N-Langinfo/Langinfo.xs +++ b/ext/I18N-Langinfo/Langinfo.xs @@ -18,9 +18,8 @@ PROTOTYPES: ENABLE INCLUDE: const-xs.inc SV* -langinfo(code) +internal_langinfo(code) int code - PROTOTYPE: _ CODE: #ifdef HAS_NL_LANGINFO RETVAL = newSVpv(nl_langinfo(code), 0); |