#define NEED_PERL_H
#define HAVE_CONFIG_H

#include <EXTERN.h>
#include <perl.h>

#include <XSUB.h>

#include "arisa.h"
#include "script-eng.h"
#include "../engine.h"
#include "../linkage.h"

typedef network_t 	*Arisa__Network;
typedef ptr2_t		Arisa__Channel;
typedef interface_t	*Arisa__Interface;
typedef ptr2_t		Arisa__Pool;
typedef queue_t		*Arisa__Queue;
typedef packlist_t	*Arisa__Packlist;
typedef user_t		*Arisa__User;
typedef chat_t		*Arisa__Admin;
typedef void		*Arisa__UI__Context;

#define PTR2SPLIT(ptr2,t1,n1,t2,n2)	\
	do {				\
		n1 = (t1*) ptr2.major;	\
		n2 = (t2*) ptr2.minor;	\
	} while(0)