/*
		 * This file was generated automatically by ExtUtils::ParseXS version 2.10 from the
		 * contents of APItest.xs. Do not edit this file, edit APItest.xs instead.
		 *
		 *	ANY CHANGES MADE HERE WILL BE LOST! 
		 *
		 */
		
		#line 1 "APItest.xs"
		#include "EXTERN.h"
		#include "perl.h"
		#include "XSUB.h"
		
		/* from exception.c */
		int exception(int);
		
		#ifndef PERL_UNUSED_VAR
		#  define PERL_UNUSED_VAR(var) if (0) var = var
		#endif
		
		#line 22 "APItest.c"
		#define UTF8KLEN(sv, len)   (SvUTF8(sv) ? -(I32)len : (I32)len)
		
		XS(XS_XS__APItest__Hash_exists); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest__Hash_exists)
          68    {
          68        dXSARGS;
          68        if (items != 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::Hash::exists(hash, key_sv)");
          68        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 15 "APItest.xs"
			STRLEN len;
			const char *key;
		#line 36 "APItest.c"
          68    	HV *	hash;
          68    	SV *	key_sv = ST(1);
          68    	bool	RETVAL;
		
          68    	if (SvROK(ST(0)) && SvTYPE(SvRV(ST(0)))==SVt_PVHV)
          68    	    hash = (HV*)SvRV(ST(0));
			else
      ######    	    Perl_croak(aTHX_ "hash is not a hash reference");
		#line 21 "APItest.xs"
			key = SvPV(key_sv, len);
			RETVAL = hv_exists(hash, key, UTF8KLEN(key_sv, len));
		#line 48 "APItest.c"
          68    	ST(0) = boolSV(RETVAL);
          68    	sv_2mortal(ST(0));
		    }
          68        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest__Hash_delete); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest__Hash_delete)
          68    {
          68        dXSARGS;
          68        if (items != 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::Hash::delete(hash, key_sv)");
          68        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 29 "APItest.xs"
			STRLEN len;
			const char *key;
		#line 67 "APItest.c"
          68    	HV *	hash;
          68    	SV *	key_sv = ST(1);
          68    	SV *	RETVAL;
		
          68    	if (SvROK(ST(0)) && SvTYPE(SvRV(ST(0)))==SVt_PVHV)
          68    	    hash = (HV*)SvRV(ST(0));
			else
      ######    	    Perl_croak(aTHX_ "hash is not a hash reference");
		#line 35 "APItest.xs"
			key = SvPV(key_sv, len);
			/* It's already mortal, so need to increase reference count.  */
			RETVAL = SvREFCNT_inc(hv_delete(hash, key, UTF8KLEN(key_sv, len), 0));
		#line 80 "APItest.c"
          68    	ST(0) = RETVAL;
          68    	sv_2mortal(ST(0));
		    }
          68        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest__Hash_store_ent); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest__Hash_store_ent)
          48    {
          48        dXSARGS;
          48        if (items != 3)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::Hash::store_ent(hash, key, value)");
          48        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 44 "APItest.xs"
			SV *copy;
			HE *result;
		#line 99 "APItest.c"
          48    	HV *	hash;
          48    	SV *	key = ST(1);
          48    	SV *	value = ST(2);
          48    	SV *	RETVAL;
		
          48    	if (SvROK(ST(0)) && SvTYPE(SvRV(ST(0)))==SVt_PVHV)
          48    	    hash = (HV*)SvRV(ST(0));
			else
      ######    	    Perl_croak(aTHX_ "hash is not a hash reference");
		#line 51 "APItest.xs"
			copy = newSV(0);
			result = hv_store_ent(hash, key, copy, 0);
			SvSetMagicSV(copy, value);
			if (!result) {
			    SvREFCNT_dec(copy);
			    XSRETURN_EMPTY;
			}
			/* It's about to become mortal, so need to increase reference count.
			 */
			RETVAL = SvREFCNT_inc(HeVAL(result));
		#line 120 "APItest.c"
          48    	ST(0) = RETVAL;
          48    	sv_2mortal(ST(0));
		    }
          48        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest__Hash_store); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest__Hash_store)
          50    {
          50        dXSARGS;
          50        if (items != 3)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::Hash::store(hash, key_sv, value)");
          50        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 68 "APItest.xs"
			STRLEN len;
			const char *key;
			SV *copy;
			SV **result;
		#line 141 "APItest.c"
          50    	HV *	hash;
          50    	SV *	key_sv = ST(1);
          50    	SV *	value = ST(2);
          50    	SV *	RETVAL;
		
          50    	if (SvROK(ST(0)) && SvTYPE(SvRV(ST(0)))==SVt_PVHV)
          50    	    hash = (HV*)SvRV(ST(0));
			else
      ######    	    Perl_croak(aTHX_ "hash is not a hash reference");
		#line 77 "APItest.xs"
			key = SvPV(key_sv, len);
			copy = newSV(0);
			result = hv_store(hash, key, UTF8KLEN(key_sv, len), copy, 0);
			SvSetMagicSV(copy, value);
			if (!result) {
			    SvREFCNT_dec(copy);
			    XSRETURN_EMPTY;
			}
			/* It's about to become mortal, so need to increase reference count.
			 */
			RETVAL = SvREFCNT_inc(*result);
		#line 163 "APItest.c"
          37    	ST(0) = RETVAL;
          37    	sv_2mortal(ST(0));
		    }
          37        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest__Hash_fetch); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest__Hash_fetch)
          68    {
          68        dXSARGS;
          68        if (items != 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::Hash::fetch(hash, key_sv)");
          68        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 95 "APItest.xs"
			STRLEN len;
			const char *key;
			SV **result;
		#line 183 "APItest.c"
          68    	HV *	hash;
          68    	SV *	key_sv = ST(1);
          68    	SV *	RETVAL;
		
          68    	if (SvROK(ST(0)) && SvTYPE(SvRV(ST(0)))==SVt_PVHV)
          68    	    hash = (HV*)SvRV(ST(0));
			else
      ######    	    Perl_croak(aTHX_ "hash is not a hash reference");
		#line 102 "APItest.xs"
			key = SvPV(key_sv, len);
			result = hv_fetch(hash, key, UTF8KLEN(key_sv, len), 0);
			if (!result) {
			    XSRETURN_EMPTY;
			}
			/* Force mg_get  */
			RETVAL = newSVsv(*result);
		#line 200 "APItest.c"
          46    	ST(0) = RETVAL;
          46    	sv_2mortal(ST(0));
		    }
          46        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest_print_double); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_double)
           1    {
           1        dXSARGS;
           1        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_double(val)");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	double	val = (double)SvNV(ST(0));
		#line 132 "APItest.xs"
		        printf("%5.3f\n",val);
		#line 219 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_have_long_double); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_have_long_double)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::have_long_double()");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	int	RETVAL;
           1    	dXSTARG;
		#line 137 "APItest.xs"
		#ifdef HAS_LONG_DOUBLE
		        RETVAL = 1;
		#else
		        RETVAL = 0;
		#endif
		#line 241 "APItest.c"
           1    	XSprePUSH; PUSHi((IV)RETVAL);
		    }
           1        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest_print_long_double); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_long_double)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_long_double()");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 148 "APItest.xs"
		#ifdef HAS_LONG_DOUBLE
		#   if defined(PERL_PRIfldbl) && (LONG_DOUBLESIZE > DOUBLESIZE)
		        long double val = 7.0;
		        printf("%5.3" PERL_PRIfldbl "\n",val);
		#   else
		        double val = 7.0;
		        printf("%5.3f\n",val);
		#   endif
		#endif
		#line 266 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_print_int); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_int)
           1    {
           1        dXSARGS;
           1        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_int(val)");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	int	val = (int)SvIV(ST(0));
		#line 162 "APItest.xs"
		        printf("%d\n",val);
		#line 283 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_print_long); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_long)
           1    {
           1        dXSARGS;
           1        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_long(val)");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	long	val = (long)SvIV(ST(0));
		#line 168 "APItest.xs"
		        printf("%ld\n",val);
		#line 300 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_print_float); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_float)
           1    {
           1        dXSARGS;
           1        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_float(val)");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	float	val = (float)SvNV(ST(0));
		#line 174 "APItest.xs"
		        printf("%5.3f\n",val);
		#line 317 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_print_flush); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_print_flush)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::print_flush()");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
		#line 179 "APItest.xs"
			fflush(stdout);
		#line 333 "APItest.c"
		    }
           1        XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_mpushp); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mpushp)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mpushp()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 184 "APItest.xs"
			EXTEND(SP, 3);
			mPUSHp("one", 3);
			mPUSHp("two", 3);
			mPUSHp("three", 5);
			XSRETURN(3);
		#line 355 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mpushn); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mpushn)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mpushn()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 193 "APItest.xs"
			EXTEND(SP, 3);
			mPUSHn(0.5);
			mPUSHn(-0.25);
			mPUSHn(0.125);
			XSRETURN(3);
		#line 378 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mpushi); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mpushi)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mpushi()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 202 "APItest.xs"
			EXTEND(SP, 3);
			mPUSHi(-1);
			mPUSHi(2);
			mPUSHi(-3);
			XSRETURN(3);
		#line 401 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mpushu); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mpushu)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mpushu()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 211 "APItest.xs"
			EXTEND(SP, 3);
			mPUSHu(1);
			mPUSHu(2);
			mPUSHu(3);
			XSRETURN(3);
		#line 424 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mxpushp); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mxpushp)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mxpushp()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 220 "APItest.xs"
			mXPUSHp("one", 3);
			mXPUSHp("two", 3);
			mXPUSHp("three", 5);
			XSRETURN(3);
		#line 446 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mxpushn); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mxpushn)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mxpushn()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 228 "APItest.xs"
			mXPUSHn(0.5);
			mXPUSHn(-0.25);
			mXPUSHn(0.125);
			XSRETURN(3);
		#line 468 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mxpushi); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mxpushi)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mxpushi()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 236 "APItest.xs"
			mXPUSHi(-1);
			mXPUSHi(2);
			mXPUSHi(-3);
			XSRETURN(3);
		#line 490 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_mxpushu); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mxpushu)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mxpushu()");
           1        PERL_UNUSED_VAR(cv); /* -W */
           1        PERL_UNUSED_VAR(ax); /* -Wall */
           1        SP -= items;
		    {
		#line 244 "APItest.xs"
			mXPUSHu(1);
			mXPUSHu(2);
			mXPUSHu(3);
			XSRETURN(3);
		#line 512 "APItest.c"
			PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_call_sv); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_call_sv)
          56    {
          56        dXSARGS;
          56        if (items < 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::call_sv(sv, flags, ...)");
          56        PERL_UNUSED_VAR(cv); /* -W */
          56        PERL_UNUSED_VAR(ax); /* -Wall */
          56        SP -= items;
		    {
          56    	SV*	sv = ST(0);
          56    	I32	flags = (I32)SvIV(ST(1));
		#line 255 "APItest.xs"
			I32 i;
		#line 533 "APItest.c"
		#line 257 "APItest.xs"
			for (i=0; i<items-2; i++)
			    ST(i) = ST(i+2); /* pop first two args */
			PUSHMARK(SP);
			SP += items - 2;
			PUTBACK;
			i = call_sv(sv, flags);
			SPAGAIN;
			EXTEND(SP, 1);
			PUSHs(sv_2mortal(newSViv(i)));
		#line 544 "APItest.c"
          48    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_call_pv); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_call_pv)
          40    {
          40        dXSARGS;
          40        if (items < 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::call_pv(subname, flags, ...)");
          40        PERL_UNUSED_VAR(cv); /* -W */
          40        PERL_UNUSED_VAR(ax); /* -Wall */
          40        SP -= items;
		    {
          40    	char*	subname = (char *)SvPV_nolen(ST(0));
          40    	I32	flags = (I32)SvIV(ST(1));
		#line 272 "APItest.xs"
			I32 i;
		#line 565 "APItest.c"
		#line 274 "APItest.xs"
			for (i=0; i<items-2; i++)
			    ST(i) = ST(i+2); /* pop first two args */
			PUSHMARK(SP);
			SP += items - 2;
			PUTBACK;
			i = call_pv(subname, flags);
			SPAGAIN;
			EXTEND(SP, 1);
			PUSHs(sv_2mortal(newSViv(i)));
		#line 576 "APItest.c"
          32    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_call_method); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_call_method)
          32    {
          32        dXSARGS;
          32        if (items < 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::call_method(methname, flags, ...)");
          32        PERL_UNUSED_VAR(cv); /* -W */
          32        PERL_UNUSED_VAR(ax); /* -Wall */
          32        SP -= items;
		    {
          32    	char*	methname = (char *)SvPV_nolen(ST(0));
          32    	I32	flags = (I32)SvIV(ST(1));
		#line 289 "APItest.xs"
			I32 i;
		#line 597 "APItest.c"
		#line 291 "APItest.xs"
			for (i=0; i<items-2; i++)
			    ST(i) = ST(i+2); /* pop first two args */
			PUSHMARK(SP);
			SP += items - 2;
			PUTBACK;
			i = call_method(methname, flags);
			SPAGAIN;
			EXTEND(SP, 1);
			PUSHs(sv_2mortal(newSViv(i)));
		#line 608 "APItest.c"
          24    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_eval_sv); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_eval_sv)
          41    {
          41        dXSARGS;
          41        if (items != 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::eval_sv(sv, flags)");
          41        PERL_UNUSED_VAR(cv); /* -W */
          41        PERL_UNUSED_VAR(ax); /* -Wall */
          41        SP -= items;
		    {
          41    	SV*	sv = ST(0);
          41    	I32	flags = (I32)SvIV(ST(1));
		#line 306 "APItest.xs"
		    	I32 i;
		#line 629 "APItest.c"
		#line 308 "APItest.xs"
			PUTBACK;
			i = eval_sv(sv, flags);
			SPAGAIN;
			EXTEND(SP, 1);
			PUSHs(sv_2mortal(newSViv(i)));
		#line 636 "APItest.c"
          40    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_eval_pv); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_eval_pv)
           4    {
           4        dXSARGS;
           4        if (items != 2)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::eval_pv(p, croak_on_error)");
           4        PERL_UNUSED_VAR(cv); /* -W */
           4        PERL_UNUSED_VAR(ax); /* -Wall */
           4        SP -= items;
		    {
           4    	const char*	p = (const char *)SvPV_nolen(ST(0));
           4    	I32	croak_on_error = (I32)SvIV(ST(1));
		#line 319 "APItest.xs"
			PUTBACK;
			EXTEND(SP, 1);
			PUSHs(eval_pv(p, croak_on_error));
		#line 659 "APItest.c"
           3    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_require_pv); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_require_pv)
      ######    {
      ######        dXSARGS;
      ######        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::require_pv(pv)");
      ######        PERL_UNUSED_VAR(cv); /* -W */
      ######        PERL_UNUSED_VAR(ax); /* -Wall */
      ######        SP -= items;
		    {
      ######    	const char*	pv = (const char *)SvPV_nolen(ST(0));
		#line 327 "APItest.xs"
			PUTBACK;
			require_pv(pv);
		#line 680 "APItest.c"
      ######    	PUTBACK;
			return;
		    }
		}
		
		
		XS(XS_XS__APItest_exception); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_exception)
           2    {
           2        dXSARGS;
           2        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::exception(throw_e)");
           2        PERL_UNUSED_VAR(cv); /* -W */
		    {
           2    	int	throw_e = (int)SvIV(ST(0));
           2    	int	RETVAL;
           2    	dXSTARG;
		
           2    	RETVAL = exception(throw_e);
           1    	XSprePUSH; PUSHi((IV)RETVAL);
		    }
           1        XSRETURN(1);
		}
		
		
		XS(XS_XS__APItest_mycroak); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_mycroak)
           5    {
           5        dXSARGS;
           5        if (items != 1)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::mycroak(pv)");
           5        PERL_UNUSED_VAR(cv); /* -W */
		    {
           5    	const char*	pv = (const char *)SvPV_nolen(ST(0));
		#line 340 "APItest.xs"
		    Perl_croak(aTHX_ "%s", pv);
		#line 717 "APItest.c"
		    }
		    XSRETURN_EMPTY;
		}
		
		
		XS(XS_XS__APItest_strtab); /* prototype to pass -Wmissing-prototypes */
		XS(XS_XS__APItest_strtab)
           1    {
           1        dXSARGS;
           1        if (items != 0)
      ######    	Perl_croak(aTHX_ "Usage: XS::APItest::strtab()");
           1        PERL_UNUSED_VAR(cv); /* -W */
		    {
           1    	SV *	RETVAL;
		#line 345 "APItest.xs"
		   RETVAL = newRV_inc((SV*)PL_strtab);
		#line 734 "APItest.c"
           1    	ST(0) = RETVAL;
           1    	sv_2mortal(ST(0));
		    }
           1        XSRETURN(1);
		}
		
		#ifdef __cplusplus
		extern "C"
		#endif
		XS(boot_XS__APItest); /* prototype to pass -Wmissing-prototypes */
		XS(boot_XS__APItest)
           7    {
           7        dXSARGS;
           7        char* file = __FILE__;
		
           7        PERL_UNUSED_VAR(cv); /* -W */
           7        PERL_UNUSED_VAR(items); /* -W */
           7        XS_VERSION_BOOTCHECK ;
		
           7            newXS("XS::APItest::Hash::exists", XS_XS__APItest__Hash_exists, file);
           7            newXS("XS::APItest::Hash::delete", XS_XS__APItest__Hash_delete, file);
           7            newXS("XS::APItest::Hash::store_ent", XS_XS__APItest__Hash_store_ent, file);
           7            newXS("XS::APItest::Hash::store", XS_XS__APItest__Hash_store, file);
           7            newXS("XS::APItest::Hash::fetch", XS_XS__APItest__Hash_fetch, file);
           7            newXS("XS::APItest::print_double", XS_XS__APItest_print_double, file);
           7            newXS("XS::APItest::have_long_double", XS_XS__APItest_have_long_double, file);
           7            newXS("XS::APItest::print_long_double", XS_XS__APItest_print_long_double, file);
           7            newXS("XS::APItest::print_int", XS_XS__APItest_print_int, file);
           7            newXS("XS::APItest::print_long", XS_XS__APItest_print_long, file);
           7            newXS("XS::APItest::print_float", XS_XS__APItest_print_float, file);
           7            newXS("XS::APItest::print_flush", XS_XS__APItest_print_flush, file);
           7            newXS("XS::APItest::mpushp", XS_XS__APItest_mpushp, file);
           7            newXS("XS::APItest::mpushn", XS_XS__APItest_mpushn, file);
           7            newXS("XS::APItest::mpushi", XS_XS__APItest_mpushi, file);
           7            newXS("XS::APItest::mpushu", XS_XS__APItest_mpushu, file);
           7            newXS("XS::APItest::mxpushp", XS_XS__APItest_mxpushp, file);
           7            newXS("XS::APItest::mxpushn", XS_XS__APItest_mxpushn, file);
           7            newXS("XS::APItest::mxpushi", XS_XS__APItest_mxpushi, file);
           7            newXS("XS::APItest::mxpushu", XS_XS__APItest_mxpushu, file);
           7            newXS("XS::APItest::call_sv", XS_XS__APItest_call_sv, file);
           7            newXS("XS::APItest::call_pv", XS_XS__APItest_call_pv, file);
           7            newXS("XS::APItest::call_method", XS_XS__APItest_call_method, file);
           7            newXS("XS::APItest::eval_sv", XS_XS__APItest_eval_sv, file);
           7            newXS("XS::APItest::eval_pv", XS_XS__APItest_eval_pv, file);
           7            newXS("XS::APItest::require_pv", XS_XS__APItest_require_pv, file);
           7            newXS("XS::APItest::exception", XS_XS__APItest_exception, file);
           7            newXS("XS::APItest::mycroak", XS_XS__APItest_mycroak, file);
           7            newXS("XS::APItest::strtab", XS_XS__APItest_strtab, file);
           7        XSRETURN_YES;
		}