lucy-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From mar...@apache.org
Subject svn commit: r885651 - /lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm
Date Tue, 01 Dec 2009 02:12:50 GMT
Author: marvin
Date: Tue Dec  1 02:12:43 2009
New Revision: 885651

URL: http://svn.apache.org/viewvc?rev=885651&view=rev
Log:
Fix an latent syntax error in an as-yet-unused typemap.

Modified:
    lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm

Modified: lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm
URL: http://svn.apache.org/viewvc/lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm?rev=885651&r1=885650&r2=885651&view=diff
==============================================================================
--- lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm (original)
+++ lucene/lucy/trunk/boilerplater/lib/Boilerplater/Binding/Perl/TypeMap.pm Tue Dec  1 02:12:43
2009
@@ -236,12 +236,12 @@
 sub _typemap_output_start {
     my ( $big_signed_convert, $big_unsigned_convert );
     if ( $Config{ivsize} == 8 ) {
-        $big_signed_convert   = 'sv_setiv((IV)$arg);';
-        $big_unsigned_convert = 'sv_setuv((UV)$arg);';
+        $big_signed_convert   = 'sv_setiv($arg, (IV)$var);';
+        $big_unsigned_convert = 'sv_setuv($arg, (UV)$var);';
     }
     else {
-        $big_signed_convert   = 'sv_setnv((NV)$arg);';
-        $big_unsigned_convert = 'sv_setnv((NV)$arg);';
+        $big_signed_convert   = 'sv_setnv($arg, (NV)$var);';
+        $big_unsigned_convert = 'sv_setnv($arg, (NV)$var);';
     }
     return <<END_STUFF;
 



Mime
View raw message