runtime_context.c 1.57 KB
Newer Older
Philippe Virouleau's avatar
Philippe Virouleau committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78
/**
 *
 * @file runtime_context.c
 *
 * @copyright 2009-2014 The University of Tennessee and The University of
 *                      Tennessee Research Foundation. All rights reserved.
 * @copyright 2012-2017 Bordeaux INP, CNRS (LaBRI UMR 5800), Inria,
 *                      Univ. Bordeaux. All rights reserved.
 *
 ***
 *
 * @brief Chameleon StarPU context routines
 *
 * @version 1.0.0
 * @author Cedric Augonnet
 * @author Mathieu Faverge
 * @author Cedric Castagnede
 * @date 2010-11-15
 *
 */
#include <stdlib.h>
#include "chameleon_openmp.h"

/**
 *  Create new context
 */
void RUNTIME_context_create( CHAM_context_t *chamctxt )
{
    chamctxt->scheduler = RUNTIME_SCHED_OPENMP;
    return;
}

/**
 *  Clean the context
 */
void RUNTIME_context_destroy( CHAM_context_t *chamctxt )
{
    (void)chamctxt;
    return;
}

/**
 *
 */
void RUNTIME_enable( int lever )
{
    switch (lever)
    {
        case CHAMELEON_PROFILING_MODE:
            fprintf(stderr, "Profiling is not available with OpenMP\n");
            break;
        case CHAMELEON_BOUND:
            fprintf(stderr, "Bound computation is not available with OpenMP\n");
            break;
        default:
            return;
    }
    return;
}

/**
 *
 */
void RUNTIME_disable( int lever )
{
    switch (lever)
    {
        case CHAMELEON_PROFILING_MODE:
            fprintf(stderr, "Profiling is not available with OpenMP\n");
            break;
        case CHAMELEON_BOUND:
            fprintf(stderr, "Bound computation is not available with OpenMP\n");
            break;
        default:
            return;
    }
    return;
}