Профайлер rsl

Автор:LeonL
Дата:03.06.2008
Просмотров:4128
Скачиваний:949
Оценка:, Оценок - 1

Описание

Текст примера

 Пример выполнения:
макрос:
macro Test()
      var dbg=TDBG("Test");
       macro Test1( a , b )      
         var i=0;
         var dbg=TDBG("Test","A",a,"B",b);
         while (i<10000)  
                a=a*b;
                i=i+1;
         end;
         dbg.Log(false,"print hi");
       end;
       Test1( 2 ,7 );
end;           

dbg=TDBG("Main");
 Test();
 Test();
---------------- отчет по макросу ----------------
     0.ms├┬BEGIN Main 
     0.ms│├┬BEGIN Test 
     0.ms││├┬BEGIN Test A=2,B=7,
    31.ms│││├print hi
    31.ms│││└END Test A=2,B=7,
    31.ms││└END Test 
     0.ms│├┬BEGIN Test 
     0.ms││├┬BEGIN Test A=2,B=7,
    16.ms│││├print hi
    16.ms│││└END Test A=2,B=7,
    16.ms││└END Test 
    47.ms│└END Main