#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "src/Exceptions.h"

// SV* except(char* name, char* message) {
//       char class_name[80];
//       strcpy(class_name, "Bio::Phylo::Util::Exceptions::");
//       strcat(class_name, name);
//       
//       Exceptions* exception;
//       SV* obj;
//       SV* obj_ref;
// 
//       Newx(exception, 1, Exceptions);
//       exception->message = savepv(message);
// 
//       obj = newSViv((IV)exception);
//       obj_ref = newRV_noinc(obj);
//       sv_bless(obj_ref, gv_stashpv(class_name, GV_ADD));
//       SvREADONLY_on(obj);
// 
//       return obj_ref;
// }
// 
// char* error(SV* self) {
// 	return ((Exceptions*)SvIV(SvRV(self)))->message;
// }
MODULE = Bio::PhyloXS::Util::Exceptions  PACKAGE = Bio::PhyloXS::Util::Exceptions  

PROTOTYPES: DISABLE