runtime_context.c 1.62 KB
Newer Older
1
/**
2 3
 *
 * @file runtime_context.c
4
 *
5
 * @copyright 2009-2014 The University of Tennessee and The University of
Mathieu Faverge's avatar
Mathieu Faverge committed
6
 *                      Tennessee Research Foundation. All rights reserved.
7 8
 * @copyright 2012-2017 Bordeaux INP, CNRS (LaBRI UMR 5800), Inria,
 *                      Univ. Bordeaux. All rights reserved.
9
 *
Mathieu Faverge's avatar
Mathieu Faverge committed
10 11 12
 ***
 *
 * @brief Chameleon Quark context routines
13
 *
14
 * @version 1.0.0
15 16
 * @author Vijay Joshi
 * @author Cedric Castagnede
17
 * @date 2011-10-29
18
 *
19
 */
20
#include <stdlib.h>
21
#include "chameleon_quark.h"
22

23
/**
24
 *  Create new context
25
 */
Mathieu Faverge's avatar
Mathieu Faverge committed
26
void RUNTIME_context_create( CHAM_context_t *chamctxt )
27
{
Mathieu Faverge's avatar
Mathieu Faverge committed
28
    chamctxt->scheduler = RUNTIME_SCHED_QUARK;
29 30 31 32
    /* Will require the static initialization if we want to use it in this code */
    return;
}

33
/**
34
 *  Clean the context
35
 */
Mathieu Faverge's avatar
Mathieu Faverge committed
36
void RUNTIME_context_destroy( CHAM_context_t *chamctxt )
37
{
Mathieu Faverge's avatar
Mathieu Faverge committed
38
    (void)chamctxt;
39 40 41
    return;
}

42
/**
43 44
 *
 */
Mathieu Faverge's avatar
Mathieu Faverge committed
45
void RUNTIME_enable( int lever )
46 47 48
{
    switch (lever)
    {
Mathieu Faverge's avatar
Mathieu Faverge committed
49
        case CHAMELEON_PROFILING_MODE:
50 51
            fprintf(stderr, "Profiling is not available with Quark\n");
            break;
Mathieu Faverge's avatar
Mathieu Faverge committed
52
        case CHAMELEON_BOUND:
53 54 55 56 57 58 59 60
            fprintf(stderr, "Bound computation is not available with Quark\n");
            break;
        default:
            return;
    }
    return;
}

61
/**
62
 *
63
 */
Mathieu Faverge's avatar
Mathieu Faverge committed
64
void RUNTIME_disable( int lever )
65 66 67
{
    switch (lever)
    {
Mathieu Faverge's avatar
Mathieu Faverge committed
68
        case CHAMELEON_PROFILING_MODE:
69 70
            fprintf(stderr, "Profiling is not available with Quark\n");
            break;
Mathieu Faverge's avatar
Mathieu Faverge committed
71
        case CHAMELEON_BOUND:
72 73 74 75 76 77 78
            fprintf(stderr, "Bound computation is not available with Quark\n");
            break;
        default:
            return;
    }
    return;
}