The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

%{

#include <Box2D/Box2D.h>

%}

%module{Box2D};

%name{Box2D::b2ContactImpulse} class b2Contact
{

%{

float32
b2ContactImpulse::normalImpulses( index )
	int index
	CODE:
		RETVAL = THIS->normalImpulses[index];
	OUTPUT:
		RETVAL

%}

};