fiddle vs sleepy_penguin vs Perl syscall() bench scripts

[Eric Wong <e@80x24.org>]

[-- Attachment #1: Type: text/plain, Size: 254 bytes --]

Eric Wong <e@80x24.org> wrote:
> I'll need to rework this series to maintain sleepy_penguin
> support and only use fiddle as a fallback.  libffi and fiddle
> use more CPU, which is noticeable on an ancient laptop...

scripts used for testing attached :>

[-- Attachment #2: splice_bench.pl --]
[-- Type: text/x-perl, Size: 258 bytes --]

#!/usr/bin/perl -w
use strict;
use Benchmark qw(:all :hireswallclock);
BEGIN { require 'sys/syscall.ph' };
my $s;
my $t = timeit(1, sub {
	do {
		$s = syscall(SYS_splice, 0, undef, 1, undef, 4096, 0);
	} while $s;
});
print STDERR "OK: ", timestr($t), "\n";

[-- Attachment #3: splice_bench.rb --]
[-- Type: application/x-ruby, Size: 884 bytes --]