#include "ObjectTests.hpp"

#include "compiler/function.h"
#include "core/object.h"
#include "interpreter/interpreter.h"
#include "primitives/interpreterobject.h"
#include "primitives/linkobject.h"
#include "primitives/methodobject.h"

using namespace tp;
using namespace obj;

TEST_DEF_STATIC(Dict) {
	auto integer = NDO_CAST(IntObject, NDO->create("int"));
	integer->val = 10;

	auto dict = NDO_CAST(DictObject, NDO->create("dict"));

	dict->put("val", integer);

	NDO->save(dict, "dict.o");

	auto dictLoaded = NDO_CAST(DictObject, NDO->load("dict.o"));

	TEST(dictLoaded->presents("val").isValid());
	TEST(NDO_CAST(IntObject, dictLoaded->get("val"))->val == 10);

	NDO->destroy(dict);
	NDO->destroy(dictLoaded);
}

TEST_DEF(Primitives) { 
	if (objTestModule.initialize()) {
		testDict();
		objTestModule.deinitialize();
	}
}