Mercurial > mplayer.hg
view TOOLS/perlbench.pl @ 18932:69c665e91946
Add dct64_sse, a replacement for dct64_MMX. About 60% faster on its author's Pentium III
Currently only used on CPUs that _only_ support SSE (otherwise try 3DNow* before)
Patch by The Mighty Zuxy Meng %zuxy * meng $ gmail * com%
Original thread:
Date: Jun 21, 2006 10:20 AM
Subject: [MPlayer-dev-eng] [PATCH] SSE version of DCT64 for mp3lib
author | gpoirier |
---|---|
date | Fri, 07 Jul 2006 14:04:07 +0000 |
parents | 5cbbf47cae1e |
children |
line wrap: on
line source
#!/usr/bin/perl -w use strict; use constant CMD => "./fastmem2-k7"; sub dobench { my $i; my ($runs, $sleep, $command) = @_; for($i = 0; $i < $runs; $i++) { sleep $sleep; system $command; } } print "Single run of sse bench with 1sec sleep:\n"; &dobench(1,1,CMD); print "Sleeping 10seconds before starting next bench!\n"; sleep 10; print "10 runs of sse bench with 0sec sleep:\n"; &dobench(10,0,CMD); print "Sleeping 10seconds before starting next bench!\n"; sleep 10; print "10 runs of sse bench with 1sec sleep:\n"; &dobench(10,1,CMD); print "Sleeping 10seconds before starting next bench!\n"; sleep 10; print "10 runs of sse bench with 2sec sleep:\n"; &dobench(10,2,CMD); print "Sleeping 10seconds before starting next bench!\n"; sleep 10; print "10 runs of sse bench with 3sec sleep:\n"; &dobench(10,3,CMD); print "Bench finished!\n";