@@ -447,7 +447,6 @@ static int get_value(opal_hash_table_t *attr_hash, int key,
447
447
static void * translate_to_c (attribute_key_value_t * val );
448
448
static MPI_Fint translate_to_fint (attribute_key_value_t * val );
449
449
static MPI_Aint translate_to_aint (attribute_key_value_t * val );
450
- static void * get_pointer_to_val (attribute_key_value_t * val );
451
450
452
451
static int compare_attr_sequence (const void * attr1 , const void * attr2 );
453
452
@@ -1480,38 +1479,6 @@ static MPI_Aint translate_to_aint(attribute_key_value_t *val)
1480
1479
}
1481
1480
}
1482
1481
1483
-
1484
- /*
1485
- * Return a pointer to the value.
1486
- *
1487
- * This function does not fail -- it is only invoked in "safe"
1488
- * situations.
1489
- */
1490
- static void * get_pointer_to_val (attribute_key_value_t * val )
1491
- {
1492
- switch (val -> av_set_from ) {
1493
- case OMPI_ATTRIBUTE_C :
1494
- /* Case 3: wrote a C pointer, get pointer to C pointer */
1495
- return & val -> av_value .av_pointer ;
1496
-
1497
- case OMPI_ATTRIBUTE_INT :
1498
- /* Case 6: wrote an int, get pointer to int */
1499
- return & val -> av_value .av_int ;
1500
-
1501
- case OMPI_ATTRIBUTE_FINT :
1502
- /* Case 9: wrote a MPI_Fint, get pointer to Fint */
1503
- return & val -> av_value .av_fint ;
1504
-
1505
- case OMPI_ATTRIBUTE_AINT :
1506
- /* Case 12: wrote a MPI_Aint, get pointer to Aint*/
1507
- return & val -> av_value .av_aint ;
1508
-
1509
- default :
1510
- /* Should never reach here */
1511
- return NULL ;
1512
- }
1513
- }
1514
-
1515
1482
/*
1516
1483
* Comparator for qsort() to sort attributes in the order that they were set.
1517
1484
*/
0 commit comments