Skip Menu |
 

This queue is for tickets about the ExtUtils-XSBuilder CPAN distribution.

Report information
The Basics
Id: 54387
Status: new
Priority: 0/
Queue: ExtUtils-XSBuilder

People
Owner: Nobody in particular
Requestors: ansgar [...] 43-1.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: [PATCH] use C type instead of mapped perl type for return declarations
Date: Mon, 08 Feb 2010 00:13:43 +0900
To: bug-ExtUtils-XSBuilder [...] rt.cpan.org
From: Ansgar Burchardt <ansgar [...] 43-1.org>
Download (untitled) / with headers
text/plain 146b
Hi, the attached patch was introduced by Angus Lees in the Debian package for ExtUtils-XSBuilder. Please consider applying it. Regards, Ansgar
Download use-C-type.patch
text/x-diff 838b
From: Angus Lees <gus@debian.org> Date: Mon, 10 Mar 2003 22:47:03 +1100 Subject: use C type instead of mapped perl type for return declarations Patch WrapXS::get_function to use C type instead of mapped perl type for return declarations. --- libextutils-xsbuilder-perl.orig/XSBuilder/WrapXS.pm +++ libextutils-xsbuilder-perl/XSBuilder/WrapXS.pm @@ -557,7 +557,8 @@ $name =~ /^DESTROY$/ ? 'void' : $func->{return_type}; my $retdecl = @$retargs?(join "\n", - (map { my $type = $self -> cname($_->{class}) ; $type =~ s/\*$//; ' ' . $type . " $_->{name};"} @$retargs), + # TypeMap->map_args has already stripped a * from retargs + (map { my $type = $_->{rtype} ; $type =~ s/^const\s+//; ' ' . $type . " $_->{name};"} @$retargs), #' ' . $self -> cname($return_type) . ' RETVAL', ''):'';


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.