src/AST/function.c

   1 #include "function.h"
   2 #include "table.h"
   3 #include "set.h"
   4
   5
   6 Function* allocFunctionOperator( ArithOp op, Set ** domain, uint numDomain, Set * range,OverFlowBehavior overflowbehavior){
   7     FunctionOperator* This = (FunctionOperator*) ourmalloc(sizeof(FunctionOperator));
   8     GETFUNCTIONTYPE(This)=OPERATORFUNC;
   9     This->domains = allocVectorArraySet(numDomain, domain);
  10     This->op=op;
  11     This->overflowbehavior = overflowbehavior;
  12     This->range=range;
  13     return  &This->base;
  14 }
  15
  16 Function* allocFunctionTable (Table* table){
  17     FunctionTable* This = (FunctionTable*) ourmalloc(sizeof(FunctionTable));
  18     GETFUNCTIONTYPE(This)=TABLEFUNC;
  19     This->table = table;
  20 }
  21
  22 void deleteFunction(Function* This){
  23     switch( GETFUNCTIONTYPE(This)){
  24         case TABLEFUNC:
  25             ourfree((FunctionTable*)This);
  26             break;
  27         case OPERATORFUNC:
  28             ourfree((FunctionOperator*) This);
  29             break;
  30         default:
  31             ASSERT(0);
  32     }
  33 }