On 26 March 2013 13:14, Marc Lehmann <schmorp@schmorp.de> wrote: > The very fact that your test is apparently slightly faster with a much > slower function call should have been an enourmous wake-up call to you - > at the very least, you could have added an abort() to atcually check if > its actually being executed. But hey, it fooled Yves too. If you are referring to the timing results that Merijn posted then I dont know what you mean by "fooled" me. I looked at the numbers and concluded that the variance was in the noise. Such a description is exactly what you expect if the code is the same for both. I did not closely look at Merijn's code, and made and make no comment on whether it is a valid benchmark. As for /your/ "benchmark", well, it doesn't seem to be very useful either. "real 0m0.808s" is the output of the bash time function, and does not constitute a benchmark in any way. I suggest you read http://blogs.perl.org/users/steffen_mueller/2010/09/your-benchmarks-suck.html which could almost be tailor written for this exact case. Try running under dumbbench for a while and see what it says. THAT would be a real benchmark. What you posted is a discrete timing, and on its own tells us almost nothing. Lastly I would just like to say that comments like this: "That probably doesn't mean much to p5pers who don't mind slowing down perl by a factor of up to two because its fun to run your own mmu emulation in the process emulation code, but it means a lot to JSON::XS." are unhelpful and just plain rude. We care a lot about slowing down perl, and if we do slow down perl we do only because we have good reasons, like correctness or security. You are clearly an intelligent person. Anyone reading your code knows you are both an experienced C programmer and an intelligent guy. However when you say snotty things like me being fooled, or that we don't care about performance, you come across as an extremely unpleasant person, which in turn makes people like me quite unwilling to help you. The fact is I could mention a few things that would grind an extra few percent out of JSON::XS, which you seem to care about, but I probably won't because I am unwilling to help someone who is repeatedly rude and insulting to me and my colleagues. You need to think about that for a while. You are missing out on the support of other clever people only because you cant keep a civil tongue in your head. That is sad. Yves -- perl -Mre=debug -e "/just|another|perl|hacker/"Thread Previous | Thread Next