ext/Devel/PPPort/harness/module2.c


1
2
3
4
5
6
7
8
9
10
11
12


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

#define NEED_newCONSTSUB_GLOBAL
#include "ppport.h"

void test2(void)
{
	newCONSTSUB(gv_stashpv("Devel::Harness", FALSE), "test_value_2", newSViv(2));
}