"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "IO/HDF/typemap" between
PDL-2.081.tar.gz and PDL-2.082.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

typemap  (PDL-2.081)	:	typemap  (PDL-2.082)
# Extra type mappings for PDL::IO::HDF		# Extra type mappings for PDL::IO::HDF
# basic C types		# basic C types
int * T_PVI		int * T_PVI
long int * T_PVI		long int * T_PVI
size_t * T_PVI		size_t * T_PVI
nc_type * T_PVI
nc_type T_IV
PDLchar * T_PDL
PDLuchar * T_PDL
PDLshort * T_PDL
PDLint * T_PDL		PDLint * T_PDL
PDLlong * T_PDL		PDLlong * T_PDL
PDLfloat * T_PDL
PDLdouble * T_PDL
PDLvoid * T_PDL		PDLvoid * T_PDL
PDLlist * T_PVI
#############################################################################		#############################################################################
INPUT		INPUT
T_PVI		T_PVI
$var = ($type)SvPV($arg,PL_na)		$var = ($type)SvPV($arg,PL_na)
T_PDLB
$var = (unsigned char *)(PDL->SvPDLV($arg)->data)
T_PDLS
$var = (short *)(PDL->SvPDLV($arg)->data)
T_PDLUS
$var = (unsigned short *)(PDL->SvPDLV($arg)->data)
T_PDLL
$var = (long *)(PDL->SvPDLV($arg)->data)
T_PDLF
$var = (float *)(PDL->SvPDLV($arg)->data)
T_PDLD
$var = (double *)(PDL->SvPDLV($arg)->data)
#############################################################################		#############################################################################
OUTPUT		OUTPUT
T_PVI		T_PVI
sv_setiv((SV*)$arg, (IV)*$var);		sv_setiv((SV*)$arg, (IV)*$var);
T_PDLB
PDL->SetSV_PDL($arg,$var);
T_PDLS
PDL->SetSV_PDL($arg,$var);
T_PDLUS
PDL->SetSV_PDL($arg,$var);
T_PDLL
PDL->SetSV_PDL($arg,$var);
T_PDLF
PDL->SetSV_PDL($arg,$var);
T_PDLD
PDL->SetSV_PDL($arg,$var);
End of changes. 5 change blocks.
21 lines changed or deleted		0 lines changed or added

---