Inline::ASM ???

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;

}

No Comments yet »

RSS feed for comments on this post. TrackBack URI

Leave a comment

XHTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>

Powered by WordPress with GimpStyle Theme design by Horacio Bella.
Entries and comments feeds. Valid XHTML and CSS.