Re: speed test, anyone?
Re: speed test, anyone?
- Subject: Re: speed test, anyone?
- From: Daniel Jalkut <email@hidden>
- Date: Sat, 05 Nov 2005 03:06:12 -0500
I ran the test a few times, and noticed that the results were
somewhat dramatically different from run to run, so I sent you
several samples. Maybe others should do the same to increase the
statistical value.
D
On Nov 5, 2005, at 2:50 AM, Emmanuel wrote:
We had published the results of a speed comparison between Jaguar,
Panther and Tiger, where we proved that "do shell script" is 4.5
times slower under Tiger.
This is at:
<http://www.satimage-software.com/test_05_08/speed_test_result.html>
There you can see the testing method, the data we collected, and
the results displayed.
The release notes for 10.4.3 say that a performance issue regarding
do shell script was fixed. It would be wonderful if we could
confirm that.
To that effect I've prepared a short script for Smile (Smile is a
free download at <http://www.satimage-software.com/en/
downloads_smile.html>). Please copy the script into a new
"AppleScript terminal" window, select all, press Enter. The script
runs instantaneously, it will display your result and propose to
send the result (stuffed into the Subject) in an email to me.
Confirm, then click Send.
Thanks,
Emmanuel
-- this is a script for Smile
-- to run it, select all then press Enter
--
set bmin to 1
repeat 5 times
chrono
beep
set x to chrono
if x < bmin then set bmin to x
end repeat
set smin to 1
repeat 5 times
chrono
do shell script ""
set x to chrono
if x < smin then set smin to x
end repeat
set OneRunDuration to smin - bmin
set OneCycleDuration to 1 / (system attribute "pclk")
set CyclesPerRun to OneRunDuration / OneCycleDuration
set runsPerGigaCycle to round (1.0E+9 / CyclesPerRun)
if runsPerGigaCycle > 190 then
set diff to runsPerGigaCycle / 190 - 1
set x to round (100 * diff)
dd("Test completed. Joy, I'm " & x & "% faster than Panther!")
else
set diff to 190 / runsPerGigaCycle - 1
set x to round (100 * diff)
dd("Test completed. Doh, Panther was " & x & "% faster!")
end if
try
display dialog "OK. Now I'll send the results to good ol' Emmanuel."
on error
return
end try
set thesub to "?subject=speedtest1043-" & runsPerGigaCycle
set theadd to "email@hidden"
set theurl to "mailto:"; & theadd & thesub
open location theurl
set overhead to round 1000000 * bmin
set doshelltotal to round 1000000 * smin
set doshellalone to round 1000000 * OneRunDuration
quietmsg("osax overhead: " & overhead & " µs")
quietmsg("do shell script total: " & doshelltotal & " µs")
quietmsg("do shell script alone: " & doshellalone & " µs")
msg("cycles for do shell script = " & CyclesPerRun)
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (Applescript-
email@hidden)
Help/Unsubscribe/Update your Subscription:
40red-sweater.com
This email sent to email@hidden
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
This email sent to email@hidden