"línea C"-la pregunta

#!/usr/bin/env perl 
use warnings; 
use 5.012; 
use Inline 'C'; 

my $value = test(); 
say $value; 

__END__ 
__C__ 
void test() { 
    int a = 4294967294; 
    Inline_Stack_Vars; 
    Inline_Stack_Reset; 
    Inline_Stack_Push(sv_2mortal(newSViv(a))); 
    Inline_Stack_Done; 
}

Salida:"línea C"-la pregunta

-2

¿Por qué aparece aquí una salida de "-2"?

Fuente

2011-02-27 sid_com

¿por qué 'use 5.012'? – ysth

Así que no tengo que escribir "use strict; use 5.010;". Y entonces sé el siglo de la última edición del archivo; –

int a usa probablemente una representación de 32 bits. Debe usar unsigned int si desea representar valores superiores a 4,294,967,296/2.

Fuente

2011-02-27 11:58:49 Benoit

Eso no ayudará, excepto en un perl con soporte int de 64 bits. – ysth

Perl admite enteros con signo y sin signo, y sus operadores cambiarán muy bien entre ellos, pero usted está solicitando explícitamente un IV (firmado int tipo SV). Use newSVuv en su lugar. También necesita decir UV a = o unsigned a = en lugar de int si las entradas son de 32 bits, pero perl usa enteros de 64 bits, ya que de lo contrario el lanzamiento a UV realizado por newSVuv terminará extendiendo el bit de signo a través de los 32 bits superiores.

Fuente

2011-02-27 22:41:09 ysth

Cuando solo cambio newSVuv sin "UV a =" obtengo un resultado diferente. –

@sid_com: ah, si tiene perl usando 64 bit ints pero un "int" es de 32 bits, ¿necesita ambos? – ysth

Respuesta

Cuestiones relacionadas