Lukis Home

Inline::ASM ???

Posted by Luki - 07/10/08 at 09:10:39 am

Inline Assembler in Perl, geht nicht? Geht doch:

use Inline C;

$a = asmadd(6,19);
print “$a\n”;

__END__
__C__

int asmadd( int a, int b){
asm( “addl %%ebx, %%eax;\n”
: “=a” (a)
: “a” (a), “b” (b)
);
return a;

}

Search