Interesting speed test

Hi,

I just wrote a little script for a speed test:

//+------------------------------------------------------------------+
//|                                                    SpeedTest.mq4 |
//|                        Copyright 2014, MetaQuotes Software Corp. |
//|                                              https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2014, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
//+------------------------------------------------------------------+
//| Script program start function                                    |
//+------------------------------------------------------------------+
#define Pow2(a) ((a)*(a))

void OnStart()
  {
//---
   string c1, c2;
   uint end, beg = GetTickCount();
   double x,p = M_PI;
   int  i,y,d = Digits,loops = 100000000; //EMPTY_VALUE;
   for(i=0;i<loops;i++) {
      x = MathPow(p*M_LN2,2);
      y = (int)MathPow((double)d,2);
   } 
   end = GetTickCount()-beg;
   c1 = StringConcatenate("MathPow( (x*y),2 ) => ",DoubleToString((double)end/1000.0,3)," sec" );

   beg = GetTickCount();
   for(i=0;i<loops;i++) {
      x = Pow2( (p*M_LN2) );
      y = Pow2((d));
   } 
   end = GetTickCount()-beg;
   c2 = StringConcatenate("Pow2( (x*y) ) => ",DoubleToString((double)end/1000.0,3)," sec" );
   Comment("Loops: ",(string)loops,"\n",c1,"\n",c2);
   Print("Loops: ",(string)loops,"   ",c1,"   ",c2);
  }
//+------------------------------------------------------------------+

And this is the result:

2015.01.17 10:05:19.913	SpeedTest EURUSD,M1: Loops: 100000000   MathPow( (x*y),2 ) => 15.850 sec   Pow2( (x*y) ) => 1.139 sec