mqparser/mqscriptfunc_table.h

#ifndef _PROCSCRIPT_PARSER_FUNCTABLE_H_
#define _PROCSCRIPT_PARSER_FUNCTABLE_H_

union FunctionPointer
{
        Segment (*a_fnctptr_a_m_s_d_s) ( Segment , Map2D , char* , double , char* );

        double (*d_fnctptr_a) ( Segment );

        double (*d_fnctptr_a_s) ( Segment , char* );

        double (*d_fnctptr_d) ( double );

        double (*d_fnctptr_d_d) ( double , double );

        double (*d_fnctptr_d_d_d_d) ( double , double , double , double );

        double (*d_fnctptr_d_s) ( double , char* );

        double (*d_fnctptr_g) ( PeakGroup );

        double (*d_fnctptr_g_s_d) ( PeakGroup , char* , double );

        double (*d_fnctptr_m) ( Map2D );

        double (*d_fnctptr_m_d) ( Map2D , double );

        double (*d_fnctptr_m_d_d) ( Map2D , double , double );

        double (*d_fnctptr_m_d_d_d_d_s) ( Map2D , double , double , double , double , char* );

        double (*d_fnctptr_m_s) ( Map2D , char* );

        double (*d_fnctptr_r) ( VariantArray );

        double (*d_fnctptr_r_d) ( VariantArray , double );

        double (*d_fnctptr_r_d_d) ( VariantArray , double , double );

        double (*d_fnctptr_r_m_s) ( VariantArray , Map2D , char* );

        double (*d_fnctptr_r_s) ( VariantArray , char* );

        double (*d_fnctptr_s) ( char* );

        double (*d_fnctptr_s_m_s_d) ( char* , Map2D , char* , double );

        double (*d_fnctptr_s_s) ( char* , char* );

        double (*d_fnctptr_s_s_d_d_d_d) ( char* , char* , double , double , double , double );

        double (*d_fnctptr_s_s_s_d_d) ( char* , char* , char* , double , double );

        double (*d_fnctptr_s_s_s_s) ( char* , char* , char* , char* );

        double (*d_fnctptr_v) ( void );

        PeakGroup (*g_fnctptr_g) ( PeakGroup );

        PeakGroup (*g_fnctptr_g_m_r_s) ( PeakGroup , Map2D , VariantArray , char* );

        PeakGroup (*g_fnctptr_g_m_r_s_d_s_d_d) ( PeakGroup , Map2D , VariantArray , char* , double , char* , double , double );

        PeakGroup (*g_fnctptr_r) ( VariantArray );

        SegmentHandler (*h_fnctptr_h_g) ( SegmentHandler , PeakGroup );

        SegmentHandler (*h_fnctptr_s) ( char* );

        Map2D (*m_fnctptr_a_m_m) ( Segment , Map2D , Map2D );

        Map2D (*m_fnctptr_g_m_m) ( PeakGroup , Map2D , Map2D );

        Map2D (*m_fnctptr_h_g) ( SegmentHandler , PeakGroup );

        Map2D (*m_fnctptr_m) ( Map2D );

        Map2D (*m_fnctptr_m_d) ( Map2D , double );

        Map2D (*m_fnctptr_m_m_a) ( Map2D , Map2D , Segment );

        Map2D (*m_fnctptr_m_m_m_m) ( Map2D , Map2D , Map2D , Map2D );

        Map2D (*m_fnctptr_m_s) ( Map2D , char* );

        Map2D (*m_fnctptr_m_s_d) ( Map2D , char* , double );

        Map2D (*m_fnctptr_r_m) ( VariantArray , Map2D );

        Map2D (*m_fnctptr_s) ( char* );

        VariantArray (*r_fnctptr_a) ( Segment );

        VariantArray (*r_fnctptr_d_d) ( double , double );

        VariantArray (*r_fnctptr_d_d_d_d) ( double , double , double , double );

        VariantArray (*r_fnctptr_g) ( PeakGroup );

        VariantArray (*r_fnctptr_g_s) ( PeakGroup , char* );

        VariantArray (*r_fnctptr_h_g) ( SegmentHandler , PeakGroup );

        VariantArray (*r_fnctptr_m) ( Map2D );

        VariantArray (*r_fnctptr_m_r_d_d) ( Map2D , VariantArray , double , double );

        VariantArray (*r_fnctptr_m_s_d) ( Map2D , char* , double );

        VariantArray (*r_fnctptr_r) ( VariantArray );

        VariantArray (*r_fnctptr_r_g) ( VariantArray , PeakGroup );

        VariantArray (*r_fnctptr_s) ( char* );

        VariantArray (*r_fnctptr_s_s_s) ( char* , char* , char* );

        char* (*s_fnctptr_d_d) ( double , double );

        char* (*s_fnctptr_s) ( char* );

};

typedef union FunctionPointer FunctionPointer;

struct MQFunction
{
        PrimExp                 args[10];
        PrimExp                 rval;
        int                             nargs;
        union FunctionPointer   pfunc;
        char*                   ftype;
};

typedef struct MQFunction MQFunction;

struct FunctionTable
{
  char                   *fname;
  union FunctionPointer pfunc;
  char                   *ftype;
};

typedef struct FunctionTable FunctionTable;

FunctionTable*  FunctionTable_createArray(int size);
void                    FunctionTable_init();

Variant                 CallFunction(MQFunction F, MQFunction P);

extern MQFunction*              paramstack;
extern FunctionTable    arith_fncts[];

#endif

---