1			/*
     2			 * This file was generated automatically by ExtUtils::ParseXS version 2.10 from the
     3			 * contents of TW.xs. Do not edit this file, edit TW.xs instead.
     4			 *
     5			 *	ANY CHANGES MADE HERE WILL BE LOST! 
     6			 *
     7			 */
     8			
     9			#include <EXTERN.h>
    10			#include <perl.h>
    11			#include <XSUB.h>
    12			#define U8 U8
    13			#include "encode.h"
    14			#include "bi_01_t.h"
    15			#include "ma_03_t.h"
    16			#include "cp_02_t.h"
    17			#include "bi_00_t.h"
    18			
    19			static void
    20			Encode_XSEncoding(pTHX_ encode_t *enc)
    21	          20    {
    22	          20     dSP;
    23	          20     HV *stash = gv_stashpv("Encode::XS", TRUE);
    24	          20     SV *sv    = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
    25	          20     int i = 0;
    26	          20     PUSHMARK(sp);
    27	          20     XPUSHs(sv);
    28	          40     while (enc->name[i])
    29			  {
    30	          20       const char *name = enc->name[i++];
    31	          20       XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
    32			  }
    33	          20     PUTBACK;
    34	          20     call_pv("Encode::define_encoding",G_DISCARD);
    35	          20     SvREFCNT_dec(sv);
    36			}
    37			
    38			#ifndef PERL_UNUSED_VAR
    39			#  define PERL_UNUSED_VAR(var) if (0) var = var
    40			#endif
    41			
    42			#ifdef __cplusplus
    43			extern "C"
    44			#endif
    45			XS(boot_Encode__TW); /* prototype to pass -Wmissing-prototypes */
    46			XS(boot_Encode__TW)
    47	           5    {
    48	           5        dXSARGS;
    49			
    50	           5        PERL_UNUSED_VAR(cv); /* -W */
    51	           5        PERL_UNUSED_VAR(items); /* -W */
    52	           5        XS_VERSION_BOOTCHECK ;
    53			
    54			
    55			    /* Initialisation Section */
    56			
    57			{
    58			#include "bi_01_t.exh"
    59			#include "ma_03_t.exh"
    60			#include "cp_02_t.exh"
    61			#include "bi_00_t.exh"
    62			}
    63			
    64			
    65			    /* End of Initialisation Section */
    66			
    67	           5        XSRETURN_YES;
    68			}
    69