Commit 5e0399c9 authored by lykos98's avatar lykos98
Browse files

added flag to turn on experimental h1 cener elimination, currently not working correctly

parent 8fdf2836

src/adp/adp.c

+22 −25
Original line number Diff line number Diff line
@@ -768,9 +768,8 @@ clusters_t Heuristic1(global_context_t *ctx) 
                 * use an array of locks, and compare and swap to actually gain control of the thing

                 *

                 * */

                #pragma omp critical

                {



#ifdef EXPERIMENTAL_H1

                int owner = foreign_owner(ctx, jidx);

                idx_t jpos = jidx - ctx -> rank_idx_start[owner];
@@ -797,9 +796,8 @@ clusters_t Heuristic1(global_context_t *ctx) 
                }



                state = h1_lock_free(ctx, win_locks, owner, jpos, state);

                }

#else



                /*

                #pragma omp critical (h1_centers_elimination)

                {

                    int owner = foreign_owner(ctx, jidx);
@@ -824,8 +822,7 @@ clusters_t Heuristic1(global_context_t *ctx) 
                    }



                    MPI_Win_unlock(owner, win_to_remove_mask);

                }

                */

#endif

            }

        }

    }