"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "Basic/Core/pdlcore.h" between
PDL-2.078.tar.gz and PDL-2.079.tar.gz

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

pdlcore.h  (PDL-2.078):pdlcore.h  (PDL-2.079)
#ifndef __PDLCORE_H #ifndef __PDLCORE_H
#define __PDLCORE_H #define __PDLCORE_H
/* version 20: memory-management changes */ /* version 20: memory-management changes */
/* on 21, unify pdl_broadcast per_pdl_flags, par_flags; remove threadloop #defin es; change creating to char; relocate struct pdl.value appropriately */ /* on 21, unify pdl_broadcast per_pdl_flags, par_flags; remove threadloop #defin es; change creating to char; relocate struct pdl.value appropriately, remove pdl _null */
#define PDL_CORE_VERSION 20 #define PDL_CORE_VERSION 20
#define startbroadcastloop startthreadloop #define startbroadcastloop startthreadloop
#define pdl_startbroadcastloop pdl_startthreadloop #define pdl_startbroadcastloop pdl_startthreadloop
#define iterbroadcastloop iterthreadloop #define iterbroadcastloop iterthreadloop
#define pdl_iterbroadcastloop pdl_iterthreadloop #define pdl_iterbroadcastloop pdl_iterthreadloop
#define get_broadcastdims get_threaddims #define get_broadcastdims get_threaddims
#include "EXTERN.h" /* std perl include */ #include "EXTERN.h" /* std perl include */
#include "perl.h" /* std perl include */ #include "perl.h" /* std perl include */
#include "XSUB.h" /* for the win32 perlCAPI crap */ #include "XSUB.h" /* for the win32 perlCAPI crap */
skipping to change at line 49 skipping to change at line 49
/* Use our own barf and our own warn. /* Use our own barf and our own warn.
* We defer barf (and warn) handling until after multi-threaded (i.e pthreading ) * We defer barf (and warn) handling until after multi-threaded (i.e pthreading )
* processing is finished. * processing is finished.
* This is needed because segfaults happen when perl's croak is called * This is needed because segfaults happen when perl's croak is called
* during one of the spawned pthreads for PDL processing. * during one of the spawned pthreads for PDL processing.
*/ */
#define barf PDL_CORE_(pdl_barf) #define barf PDL_CORE_(pdl_barf)
#undef warn #undef warn
#define warn PDL_CORE_(pdl_warn) #define warn PDL_CORE_(pdl_warn)
pdl_error pdl_makescratchhash(pdl *ret, PDL_Anyval data);
PDL_Indx av_ndcheck(AV* av, AV* dims, int level, int *datalevel); PDL_Indx av_ndcheck(AV* av, AV* dims, int level, int *datalevel);
pdl* pdl_from_array(AV* av, AV* dims, int type, pdl* p); pdl* pdl_from_array(AV* av, AV* dims, int type, pdl* p);
PDL_Anyval pdl_at( void* x, int datatype, PDL_Indx* pos, PDL_Indx* dims, /* Valu e at x,y,z,... */ PDL_Anyval pdl_at( void* x, int datatype, PDL_Indx* pos, PDL_Indx* dims, /* Valu e at x,y,z,... */
PDL_Indx *incs, PDL_Indx offset, PDL_Indx ndims); PDL_Indx *incs, PDL_Indx offset, PDL_Indx ndims);
pdl_error pdl_writebackdata_vaffine(pdl *it); pdl_error pdl_writebackdata_vaffine(pdl *it);
pdl_error pdl_readdata_vaffine(pdl *it); pdl_error pdl_readdata_vaffine(pdl *it);
pdl_error pdl_dim_checks(pdl_transvtable *vtable, pdl **pdls, pdl_error pdl_dim_checks(pdl_transvtable *vtable, pdl **pdls,
pdl_broadcast *broadcast, PDL_Indx *creating, pdl_broadcast *broadcast, PDL_Indx *creating,
PDL_Indx *ind_sizes, char load_only); PDL_Indx *ind_sizes, char load_only);
 End of changes. 2 change blocks. 
2 lines changed or deleted 1 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)