92 lines
2.6 KiB
C++
92 lines
2.6 KiB
C++
/**
|
|
* projectM -- Milkdrop-esque visualisation SDK
|
|
* Copyright (C)2003-2004 projectM Team
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
* See 'LICENSE.txt' included within this release
|
|
*
|
|
*/
|
|
/* Evaluation Code */
|
|
|
|
#include <cstdio>
|
|
#include <cstdlib>
|
|
|
|
#include "Common.hpp"
|
|
#include "fatal.h"
|
|
|
|
#include "Eval.hpp"
|
|
#include "Expr.hpp"
|
|
#include "Param.hpp"
|
|
#include "Func.hpp"
|
|
#include "wipemalloc.h"
|
|
|
|
#include "BuiltinFuncs.hpp"
|
|
|
|
InfixOp *Eval::infix_add = NULL;
|
|
InfixOp *Eval::infix_minus = NULL;
|
|
InfixOp *Eval::infix_div = NULL;
|
|
InfixOp *Eval::infix_mult = NULL;
|
|
InfixOp *Eval::infix_or = NULL;
|
|
InfixOp *Eval::infix_and = NULL;
|
|
InfixOp *Eval::infix_mod = NULL;
|
|
InfixOp *Eval::infix_negative = NULL;
|
|
InfixOp *Eval::infix_positive = NULL;
|
|
|
|
/* Initializes all infix operators */
|
|
int Eval::init_infix_ops() {
|
|
|
|
Eval::infix_add = new InfixOp(INFIX_ADD, 4);
|
|
Eval::infix_minus = new InfixOp(INFIX_MINUS, 3);
|
|
Eval::infix_div = new InfixOp(INFIX_DIV, 2);
|
|
Eval::infix_or = new InfixOp(INFIX_OR, 5);
|
|
Eval::infix_and = new InfixOp(INFIX_AND,4);
|
|
Eval::infix_mod = new InfixOp(INFIX_MOD, 1);
|
|
Eval::infix_mult = new InfixOp(INFIX_MULT, 2);
|
|
|
|
/* Prefix operators */
|
|
Eval::infix_positive = new InfixOp(INFIX_ADD, 0);
|
|
Eval::infix_negative = new InfixOp(INFIX_MINUS, 0);
|
|
|
|
return PROJECTM_SUCCESS;
|
|
}
|
|
|
|
/* Destroys the infix operator list. This should
|
|
be done on program exit */
|
|
int Eval::destroy_infix_ops()
|
|
{
|
|
|
|
delete(Eval::infix_add);
|
|
delete(Eval::infix_minus);
|
|
delete(Eval::infix_div);
|
|
delete(Eval::infix_or);
|
|
delete(Eval::infix_and);
|
|
delete(Eval::infix_mod);
|
|
delete(Eval::infix_mult);
|
|
delete(Eval::infix_positive);
|
|
delete(Eval::infix_negative);
|
|
|
|
Eval::infix_add = NULL;
|
|
Eval::infix_minus = NULL;
|
|
Eval::infix_div = NULL;
|
|
Eval::infix_or = NULL;
|
|
Eval::infix_and = NULL;
|
|
Eval::infix_mod = NULL;
|
|
Eval::infix_mult = NULL;
|
|
Eval::infix_positive = NULL;
|
|
Eval::infix_negative = NULL;
|
|
|
|
return PROJECTM_SUCCESS;
|
|
}
|