diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-02 13:36:58 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-02 13:36:58 +0000 |
commit | 9219c8ded06600040fa6d862a60325b5afc73df4 (patch) | |
tree | 482f46293be5ea4eddf6741d69336774ed072d4f /NetWare/interface.c | |
parent | 7fb3795116dd07b7f236652a03ac53946b1af7cf (diff) | |
download | perl-9219c8ded06600040fa6d862a60325b5afc73df4.tar.gz |
Netware tweaks from Guruprasad.
p4raw-id: //depot/perl@11090
Diffstat (limited to 'NetWare/interface.c')
-rw-r--r-- | NetWare/interface.c | 24 |
1 files changed, 18 insertions, 6 deletions
diff --git a/NetWare/interface.c b/NetWare/interface.c index 3525dccd1c..c526fbd6be 100644 --- a/NetWare/interface.c +++ b/NetWare/interface.c @@ -8,17 +8,17 @@ */ /* - * FILENAME : interface.c - * DESCRIPTION : Perl parsing and running functions. - * Author : SGP - * Date : January 2001. - * + * FILENAME : interface.c + * DESCRIPTION : Calling Perl APIs. + * Author : SGP + * Date Created : January 2001. + * Date Modified: July 2nd 2001. */ #include "interface.h" - +#include "nwtinfo.h" static void xs_init(pTHX); @@ -42,6 +42,18 @@ ClsPerlHost::VersionNumber() return 0; } +bool +ClsPerlHost::RegisterWithThreadTable() +{ + return(fnRegisterWithThreadTable()); +} + +bool +ClsPerlHost::UnregisterWithThreadTable() +{ + return(fnUnregisterWithThreadTable()); +} + int ClsPerlHost::PerlCreate(PerlInterpreter *my_perl) { |