88 lines
2.9 KiB
C++
88 lines
2.9 KiB
C++
#ifdef TESTS_BUILD
|
|
#include <catch.hpp>
|
|
#include "../src/Script.hpp"
|
|
using namespace Porygon;
|
|
|
|
TEST_CASE( "Integer Negation", "[integration]" ) {
|
|
auto script = Script::Create("-60");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateInteger() == -60);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Float Negation", "[integration]" ) {
|
|
auto script = Script::Create("-5.65");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateFloat() == Approx(-5.65));
|
|
delete script;
|
|
}
|
|
|
|
TEST_CASE( "Integer Addition", "[integration]" ) {
|
|
auto script = Script::Create("1 + 5");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateInteger() == 6);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Integer Subtraction", "[integration]" ) {
|
|
auto script = Script::Create("1 - 5");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateInteger() == -4);
|
|
}
|
|
TEST_CASE( "Integer Multiplication", "[integration]" ) {
|
|
auto script = Script::Create("5 * 8");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateInteger() == 40);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Integer Division", "[integration]" ) {
|
|
auto script = Script::Create("40 / 8");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateInteger() == 5);
|
|
delete script;
|
|
}
|
|
|
|
TEST_CASE( "Float Addition", "[integration]" ) {
|
|
auto script = Script::Create("1.2 + 5.34");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateFloat() == 6.54);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Float Subtraction", "[integration]" ) {
|
|
auto script = Script::Create("1.8 - 5.14");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateFloat() == -3.34);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Float Multiplication", "[integration]" ) {
|
|
auto script = Script::Create("5.2 * 8.9");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateFloat() == 46.28);
|
|
delete script;
|
|
}
|
|
TEST_CASE( "Float Division", "[integration]" ) {
|
|
auto script = Script::Create("95.18 / 8.87");
|
|
REQUIRE(!script->Diagnostics -> HasErrors());
|
|
script->Evaluate();
|
|
auto lastValue = script->GetLastValue();
|
|
REQUIRE(lastValue->EvaluateFloat() == Approx(10.7305524239));
|
|
delete script;
|
|
}
|
|
#endif
|