Exemplo n.º 1
0
ScriptVariant *ScriptVariant_Boolean_Not(ScriptVariant * svar) {
	static ScriptVariant retvar;
	retvar.vt = VT_INTEGER;

	retvar.lVal = !ScriptVariant_IsTrue(svar);

	ScriptVariant_Copy(svar, &retvar);
	return &retvar;
}
Exemplo n.º 2
0
    return svar;
}


ScriptVariant *ScriptVariant_ModAssign(ScriptVariant *svar, ScriptVariant *rightChild )
{
    ScriptVariant_Copy(svar, ScriptVariant_Mod(svar, rightChild));
    return svar;
}

//Logical Operations

ScriptVariant *ScriptVariant_Or( ScriptVariant *svar, ScriptVariant *rightChild )
{
    static ScriptVariant retvar = {{.lVal = 0}, VT_INTEGER};
    retvar.lVal = (ScriptVariant_IsTrue(svar) || ScriptVariant_IsTrue(rightChild));
    return &retvar;
}


ScriptVariant *ScriptVariant_And( ScriptVariant *svar, ScriptVariant *rightChild )
{
    static ScriptVariant retvar = {{.lVal = 0}, VT_INTEGER};
    retvar.lVal = (ScriptVariant_IsTrue(svar) && ScriptVariant_IsTrue(rightChild));
    return &retvar;
}

ScriptVariant *ScriptVariant_Bit_Or( ScriptVariant *svar, ScriptVariant *rightChild )
{
    static ScriptVariant retvar = {{.ptrVal = NULL}, VT_EMPTY};
    LONG l1, l2;
Exemplo n.º 3
0
ScriptVariant *ScriptVariant_And(ScriptVariant * svar, ScriptVariant * rightChild) {
	static ScriptVariant retvar;
	retvar.vt = VT_INTEGER;
	retvar.lVal = (ScriptVariant_IsTrue(svar) && ScriptVariant_IsTrue(rightChild));
	return &retvar;
}