/[escript]/branches/intelc_win32/finley/src/Util.c
ViewVC logotype

Diff of /branches/intelc_win32/finley/src/Util.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 752 by woo409, Mon Jun 26 02:25:41 2006 UTC revision 753 by woo409, Mon Jun 26 02:51:25 2006 UTC
# Line 23  Line 23 
23    
24  #include "Finley.h"  #include "Finley.h"
25  #include "Util.h"  #include "Util.h"
26    #ifdef USE_QSORTG
27  #include "qsortG.h"  #include "qsortG.h"
28    #endif
29    
30  #ifdef _OPENMP  #ifdef _OPENMP
31  #include <omp.h>  #include <omp.h>
32  #endif  #endif
# Line 358  int Finley_Util_ValueAndIndex_compar(con Line 361  int Finley_Util_ValueAndIndex_compar(con
361    
362  void Finley_Util_sortValueAndIndex(dim_t n,Finley_Util_ValueAndIndex* array) {  void Finley_Util_sortValueAndIndex(dim_t n,Finley_Util_ValueAndIndex* array) {
363       /* OMP : needs parallelization !*/       /* OMP : needs parallelization !*/
364    #ifdef USE_QSORTG
365       qsortG(array,n,sizeof(Finley_Util_ValueAndIndex),Finley_Util_ValueAndIndex_compar);       qsortG(array,n,sizeof(Finley_Util_ValueAndIndex),Finley_Util_ValueAndIndex_compar);
366    #else
367         qsort(array,n,sizeof(Finley_Util_ValueAndIndex),Finley_Util_ValueAndIndex_compar);
368    #endif
369  }  }
370    
371    
Legend:
Removed from v.752  
changed lines
  Added in v.753
  ViewVC Help
Powered by ViewVC 1.1.26