test/oop2/test.c

   1 /*
   2    Copyright © 1997-98, The AROS Development Team. All rights reserved.
   3    $Id$
   4
   5    Desc: Demo of new OOP system
   6    Lang: english
   7 */
   8
   9 #include "oop.h"
  10 #include "timerclass.h"
  11 #include "protos.h"
  12 #include "support.h"
  13 #include <stdio.h>
  14
  15 extern struct List ClassList;
  16
  17
  18 #define NUM_ITERATIONS (10000000)
  19
  20 IPTR TestFunc(Class *cl, Object *o, Msg msg)
  21 {
  22      return (12345678);
  23 }
  24
  25
  26 int main(int argc, char **argv)
  27 {
  28
  29     if (InitOOP())
  30     {
  31         Class *timercl;
  32
  33         printf("Object system initialized\n");
  34
  35
  36         /* Initialize the timer class */
  37         timercl = MakeTimerClass();
  38         if (timercl)
  39         {
  40
  41             struct Node *n;
  42             Object *timer;
  43
  44             printf("Class list:\n");
  45             ForeachNode(&ClassList, n)
  46             {
  47                 printf("%s\n", n->ln_Name);
  48             }
  49             printf("\n\n");
  50
  51             printf("Hash table:\n");
  52
  53             /* Create a new instance */
  54             timer = NewObject(NULL, TIMERCLASS, NULL);
  55             if (timer)
  56             {
  57                 ULONG i;
  58                 ULONG methodid = M_Timer_TestMethod;
  59
  60                 printf("Timer object: %p\n", timer);
  61
  62                 printf ("Doing ten billion calls to test method...\n");
  63
  64
  65                 /*  Normal ivocation test */
  66                 printf ("Using normal invocation\n");
  67
  68                 Timer_Start(timer);
  69
  70                 for (i = 0; i < NUM_ITERATIONS; i ++)
  71                 {
  72                     Timer_TestMethod(timer);
  73                 }
  74
  75                 Timer_Stop(timer);
  76                 printf("Time elapsed: ");
  77                 Timer_PrintElapsed(timer);
  78
  79
  80                 /*  Function test */
  81                 printf("\nTen billion calls to empty *function*\n");
  82                 Timer_Start(timer);
  83
  84                 for (i = 0; i < NUM_ITERATIONS; i ++)
  85                 {
  86                     TestFunc(timercl, timer, (Msg)&methodid);
  87                 }
  88
  89
  90                 Timer_Stop(timer);
  91                 printf("Time elapsed: ");
  92                 Timer_PrintElapsed(timer);
  93
  94
  95
  96                 /*  Loop test */
  97                 printf("\nLooping ten billion times\n");
  98                 Timer_Start(timer);
  99
 100                 for (i = 0; i < NUM_ITERATIONS; i ++)
 101                 {
 102                     ULONG retval;
 103                     retval = 12345678;
 104                 }
 105
 106                 Timer_Stop(timer);
 107                 printf("Time elapsed: ");
 108                 Timer_PrintElapsed(timer);
 109
 110                 printf("\n\nTestMethod output: %ld\n", Timer_TestMethod(timer));
 111
 112                 /* Dispose object */
 113                 DisposeObject(timer);
 114
 115             }
 116             FreeTimerClass(timercl);
 117         }
 118         CleanupOOP();
 119     }
 120
 121     return (0);
 122 }
 123