chameleon: Fix incorrect enum type

include/main.h

@@ -289,7 +289,7 @@ extern int (*CHAMELEON_getrf_nopiv_Tile)( CHAM_desc_t * );
 extern int (*CHAMELEON_getrs_nopiv_Tile)( CHAM_desc_t *, CHAM_desc_t * );
 extern int (*CHAMELEON_build_Tile)( cham_uplo_t, CHAM_desc_t *, void *, void* );
 
-int testFEMBEM_initChameleon( cham_flttype_t stype );
+int testFEMBEM_initChameleon( ScalarType stype );
 int CHAMELEON_gemm_Tile( CHAM_desc_t *descA, CHAM_desc_t *descX, CHAM_desc_t *descY );
 
 int CHAMELEON_generate_matrix( cham_flttype_t flttype, int NB, int PQ[2],

src/chameleon.c

@@ -9,7 +9,7 @@ int (*CHAMELEON_getrf_nopiv_Tile)( CHAM_desc_t * )                       = NULL;
 int (*CHAMELEON_getrs_nopiv_Tile)( CHAM_desc_t *, CHAM_desc_t * )        = NULL; // LU Solve
 
 int
-testFEMBEM_initChameleon( cham_flttype_t stype ) {
+testFEMBEM_initChameleon( ScalarType stype ) {
   int ierr = 0;
 
   /* Set the scalar type and the functions used by CHAMELEON */

src/testCHAMELEON.c

@@ -16,7 +16,7 @@ int testCHAMELEON(double * relative_error) {
 
   /* Cree la Matrice CHAMELEON */
 
-  testFEMBEM_initChameleon( (cham_flttype_t)stype );
+  testFEMBEM_initChameleon( stype );
 
   /* Get the default NB parameter */
   int NB ;

src/testHCHAMELEON.c

@@ -38,7 +38,7 @@ int testHCHAMELEON(double * relative_error) {
 
   /* Cree la H-Matrice */
 
-  testFEMBEM_initChameleon( (cham_flttype_t)stype );
+  testFEMBEM_initChameleon( stype );
   CHAMELEON_Enable( CHAMELEON_GENERIC ); // Summa is using lacpy that is not supported for hmat yet
 
   /* Get the default NB parameter */