#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include <TestInclude.h>
MODULE = TEST		PACKAGE = TEST
		
void
C_function(iReturn)
		int   		iReturn
	OUTPUT:
		iReturn

##</code><code>##

#include "TestInclude.h"

void C_function(int	iReturn)
{
	iReturn = 5;
}

##</code><code>##

package TEST;

require Exporter;
require DynaLoader;
@ISA = qw(Exporter DynaLoader);
@EXPORT = qw(C_function);

bootstrap TEST;
1;

##</code><code>##

use TEST;

$Code = 25;
C_function($Code);
printf("Return Code:  %d\n", $Code);