Regenerate META.yml
[p5sagit/p5-mst-13.2.git] / NetWare / iperlhost.h
1
2 /*
3  * Copyright © 2001 Novell, Inc. All Rights Reserved.
4  *
5  * You may distribute under the terms of either the GNU General Public
6  * License or the Artistic License, as specified in the README file.
7  *
8  */
9
10 /*
11  * FILENAME     :   iperlhost.h
12  * DESCRIPTION  :   IPerlHost class file.
13  * Author       :   SGP
14  * Date Created :   January 2001.
15  * Date Modified:   July 2nd 2001.
16  */
17
18
19
20 #ifndef __iPerlHost_H__
21 #define __iPerlHost_H__
22
23
24 #include "EXTERN.h"
25 #include "perl.h"
26
27
28 class IPerlHost
29 {
30 public:
31         virtual int VersionNumber() = 0;
32
33         virtual int PerlCreate(PerlInterpreter *my_perl) = 0;
34         virtual int PerlParse(PerlInterpreter *my_perl,int argc, char** argv, char** env) = 0;
35         virtual int PerlRun(PerlInterpreter *my_perl) = 0;
36         virtual void PerlDestroy(PerlInterpreter *my_perl) = 0;
37         virtual void PerlFree(PerlInterpreter *my_perl) = 0;
38
39         //virtual bool RegisterWithThreadTable(void)=0;
40         //virtual bool UnregisterWithThreadTable(void)=0;
41 };
42
43 extern "C" IPerlHost* AllocStdPerl();
44 extern "C" void FreeStdPerl(IPerlHost* pPerlHost);
45
46
47 #endif  // __iPerlHost_H__
48