File: C:/mod_perl-2.0.12/WrapXS/ModPerl/Interpreter/Interpreter.xs
/*
* *********** WARNING **************
* This file generated by ModPerl::WrapXS/0.01
* Any changes made here will be lost
* ***********************************
* 01: lib/ModPerl/WrapXS.pm:549
* 02: lib/ModPerl/WrapXS.pm:1185
* 03: Makefile.PL:435
* 04: Makefile.PL:333
* 05: Makefile.PL:59
*/
#define MP_IN_XS
#include "mod_perl.h"
#include "modperl_xs_sv_convert.h"
#include "modperl_xs_util.h"
#include "modperl_xs_typedefs.h"
#include "ModPerl/Interpreter/ModPerl__Interpreter.h"
MODULE = ModPerl::Interpreter PACKAGE = ModPerl::Interpreter PREFIX = mpxs_ModPerl__Interpreter_
ModPerl::Interpreter
mpxs_ModPerl__Interpreter_current(class=Nullsv)
SV * class
CODE:
/* avoiding -Wall warnings */
class = class;
RETVAL = mpxs_ModPerl__Interpreter_current(aTHX_ class);
OUTPUT:
RETVAL
MODULE = ModPerl::Interpreter PACKAGE = ModPerl::Interpreter
ModPerl::InterpPool
mip(obj)
ModPerl::Interpreter obj
CODE:
RETVAL = (ModPerl__InterpPool) obj->mip;
OUTPUT:
RETVAL
MODULE = ModPerl::Interpreter PACKAGE = ModPerl::Interpreter
PerlInterpreter *
perl(obj)
ModPerl::Interpreter obj
CODE:
RETVAL = (PerlInterpreter *) obj->perl;
OUTPUT:
RETVAL
MODULE = ModPerl::Interpreter PACKAGE = ModPerl::Interpreter
int
num_requests(obj)
ModPerl::Interpreter obj
CODE:
RETVAL = (int) obj->num_requests;
OUTPUT:
RETVAL
MODULE = ModPerl::Interpreter PACKAGE = ModPerl::Interpreter
int
refcnt(obj)
ModPerl::Interpreter obj
CODE:
RETVAL = (int) obj->refcnt;
OUTPUT:
RETVAL
MODULE = ModPerl::Interpreter
PROTOTYPES: disabled
BOOT:
items = items; /* -Wall */