This commit was manufactured by cvs2svn to create branch 'captive'.
[reactos.git] / regtests / regtests / regtests.c
1 /*
2  * PROJECT:         ReactOS kernel
3  * FILE:            regtests/regtests/regtests.c
4  * PURPOSE:         Regression testing host
5  * PROGRAMMER:      Casper S. Hornstrup (chorns@users.sourceforge.net)
6  * UPDATE HISTORY:
7  *      06-07-2003  CSH  Created
8  */
9 #define NTOS_MODE_USER
10 #include <ntos.h>
11 #include "regtests.h"
12
13 VOID
14 RunTestDriver(LPTSTR FileName)
15 {
16   TestDriverMain Main;
17   HMODULE hModule;
18
19   hModule = LoadLibrary(FileName);
20   if (hModule != NULL) 
21     { 
22         Main = (TestDriverMain) GetProcAddress(hModule, "RegTestMain");
23         if (Main != NULL) 
24           {
25             (Main)(); 
26           }
27         FreeLibrary(hModule); 
28     }
29 }
30
31 int
32 main(int argc, char* argv[])
33 {
34   RunTestDriver("win32base.dll");
35   RunTestDriver("kmrtint.dll");
36   return 0;
37 }