tbci_param.h

Go to the documentation of this file.

 
#include "tbci/basics.h"
 
#ifndef _TBCI_PARAM_H
#define _TBCI_PARAM_H
 
NAMESPACE_TBCI
 
#define _TBCI_FLAG_ERRCHECK 1
#define _TBCI_FLAG_EXPCHECK 2
#define _TBCI_FLAG_ABORT 4
#define _TBCI_FLAG_EXCEPT 8
#define _TBCI_FLAG_EXACTSUM 16
#define _TBCI_FLAG_EXACTSUM2 32
 
#define _TBCI_CWD_DEFAULT (_TBCI_FLAG_ERRCHECK | _TBCI_FLAG_EXPCHECK | _TBCI_FLAG_EXCEPT)
 
#if 0
template <unsigned ctr>
class tbci_par
{
        public:
                unsigned int cwd;
                tbci_par() : cwd(_TBCI_CWD_DEFAULT) {};
};
 
/* Singleton */
template <unsigned ctr>
inline unsigned int& tbci_params()
{
        static tbci_par<ctr> settings;
        return settings.cwd;
}
#define GET_T_CWD tbci_params<0>()
#else
extern unsigned int tbci_control;
#define GET_T_CWD tbci_control
#endif
 
#define CWD_CTRL_FCTS(NAME, FLAG)               \
void inline set_##NAME(bool val)                \
{                                               \
        unsigned int& cwd = GET_T_CWD;          \
        if (val)                                \
                cwd |= FLAG;                    \
        else                                    \
                cwd &= ~(FLAG);                 \
};                                              \
inline unsigned int do_##NAME()                 \
{                                               \
        const unsigned int cwd = GET_T_CWD;     \
        return cwd & FLAG;                      \
}
 
#define CWD_CTRL_DISABLED(NAME)                 \
void inline set_##NAME(bool val)                \
{                                               \
        if (val)                                \
                fprintf(stderr, "TBCI warning: Attempt to set " #NAME ", which is disabled.\n"); \
};                                              \
inline unsigned int do_##NAME()                 \
{                                               \
        return 0;                               \
}
 
#ifdef TBCI_NO_ERRCHECK
CWD_CTRL_DISABLED(errcheck);
#else
CWD_CTRL_FCTS(errcheck, _TBCI_FLAG_ERRCHECK);
#endif
#ifndef TBCI_EXPCHECK
CWD_CTRL_DISABLED(expcheck);
#else
CWD_CTRL_FCTS(expcheck, _TBCI_FLAG_EXPCHECK);
#endif
CWD_CTRL_FCTS(abort, _TBCI_FLAG_ABORT);
CWD_CTRL_FCTS(except, _TBCI_FLAG_EXCEPT);
CWD_CTRL_FCTS(exactsum, _TBCI_FLAG_EXACTSUM);
CWD_CTRL_FCTS(exactsum2, _TBCI_FLAG_EXACTSUM2);
 
NAMESPACE_END
#endif