--- \Mingw\perl516\site\lib\PDL\Types.pm	2013-10-13 14:17:01 +1100
+++ \_64\perl516_470\site\lib\PDL\Types.pm	2013-10-13 14:32:13 +1100
@@ -22,7 +22,7 @@
 # Enum
 ( $PDL_B, $PDL_S, $PDL_US, $PDL_L, $PDL_IND, $PDL_LL, $PDL_F, $PDL_D ) = (0..7);
 # Corresponding pack types
-@pack= qw/C* s* S* l* l* q* f* d*/;
+@pack= qw/C* s* S* l* q* q* f* d*/;
 @names= qw/PDL_B PDL_S PDL_US PDL_L PDL_IND PDL_LL PDL_F PDL_D/;
 
 %PDL::Types::typehash = (
@@ -88,7 +88,7 @@
 		  'ctype' => 'PDL_Indx',
 		  'sym' => 'PDL_IND',
 		  'usenan' => 0,
-		  'realctype' => 'long',
+		  'realctype' => 'long long',
 		  'numval' => 4,
 		  'defbval' => 'LONG_MIN',
 		  'ppsym' => 'N',