csPerfFbg.cs

Go to the documentation of this file.

/*
 *  csharpFreiburg - src/CSharpFreiburg/src/CsPerfFbg/csPerfFbg.cs
 *  
 *  (C) 2004 - Freiburg - Project - Group
 *  ------------------------------------------------------
 *  EMail: freiburg AT compiler-factory DOT de
 *  ------------------------------------------------------
 *  all rights reserved
 */

using System;
using Freiburg;

public class Perf : TestFbg
{
    public static void Main(string[] argv)
    {   
        TestFbg CTX = new TestFbg(argv);

        int num = 10000;
        int i;

        int     val1 = 999999;
        byte[]  val2 = new byte[1000];
        for (i=0; i<1000; i++) {
            val2[i] = 1;
        }
        byte[]  val3b = new byte[10];
        for (i=0; i<10; i++) {
            val3b[i] = 2;
        }
        Object[] val3 = {(short)8888, 55.56, val3b};

        Stat stat1 = CTX.StatCreate ("int",    0, 0);
        Stat stat2 = CTX.StatCreate ("binary", 0, 0);
        Stat stat3 = CTX.StatCreate ("list",   0, 0);
        Stat statA = CTX.StatCreate ("all",    0, 0);

        Timer allT  = CTX.TimerCreate();
        Timer itemT = CTX.TimerCreate();

      // init memory
        CTX.EchoU (val2);

      // start 'all'
        allT.Init ();

      // stat1
        Console.WriteLine ("start: {0}", stat1.name);
        itemT.Init ();
        for (i = 0; i < num; i++) {
            CTX.Echo4 (val1);
        }
        stat1.Calc (itemT);
        stat1.value /= num;

      // stat2
        Console.WriteLine ("start: {0}", stat2.name);
        itemT.Init ();
        for (i = 0; i < num; i++) {
            CTX.EchoU (val2);
        }
        stat2.Calc (itemT);
        stat2.value /= num;

      // stat3
        Console.WriteLine ("start: {0}", stat3.name);
        itemT.Init ();
        for (i = 0; i < num; i++) {
            CTX.EchoL (val3);
        }
        stat3.Calc (itemT);
        stat3.value /= num;

      // finish 'all'
        statA.Calc (allT);
        statA.value /= (num+num+num);

      // print values
        stat1.Print ();
        stat2.Print ();
        stat3.Print ();
        statA.Print ();
    }
}

---