2022-06-04 04:32:20 +08:00
|
|
|
// This file is part of the Luau programming language and is licensed under MIT License; see LICENSE.txt for details
|
|
|
|
|
|
|
|
#include "Luau/ConstraintGraphBuilder.h"
|
|
|
|
#include "Luau/ConstraintSolver.h"
|
|
|
|
|
2022-09-16 06:13:58 +08:00
|
|
|
#include "ConstraintGraphBuilderFixture.h"
|
|
|
|
#include "Fixture.h"
|
|
|
|
#include "doctest.h"
|
|
|
|
|
2022-06-04 04:32:20 +08:00
|
|
|
using namespace Luau;
|
|
|
|
|
2022-07-29 11:41:13 +08:00
|
|
|
static TypeId requireBinding(NotNull<Scope> scope, const char* name)
|
2022-06-04 04:32:20 +08:00
|
|
|
{
|
|
|
|
auto b = linearSearchForBinding(scope, name);
|
|
|
|
LUAU_ASSERT(b.has_value());
|
|
|
|
return *b;
|
|
|
|
}
|
|
|
|
|
|
|
|
TEST_SUITE_BEGIN("ConstraintSolver");
|
|
|
|
|
|
|
|
TEST_CASE_FIXTURE(ConstraintGraphBuilderFixture, "hello")
|
|
|
|
{
|
|
|
|
AstStatBlock* block = parse(R"(
|
|
|
|
local a = 55
|
|
|
|
local b = a
|
|
|
|
)");
|
|
|
|
|
|
|
|
cgb.visit(block);
|
2022-09-09 05:44:50 +08:00
|
|
|
NotNull<Scope> rootScope{cgb.rootScope};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
2022-09-02 07:00:14 +08:00
|
|
|
NullModuleResolver resolver;
|
2022-09-09 05:44:50 +08:00
|
|
|
ConstraintSolver cs{&arena, singletonTypes, rootScope, "MainModule", NotNull(&resolver), {}, &logger};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
cs.run();
|
|
|
|
|
2022-07-01 07:29:02 +08:00
|
|
|
TypeId bType = requireBinding(rootScope, "b");
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
CHECK("number" == toString(bType));
|
|
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE_FIXTURE(ConstraintGraphBuilderFixture, "generic_function")
|
|
|
|
{
|
|
|
|
AstStatBlock* block = parse(R"(
|
|
|
|
local function id(a)
|
|
|
|
return a
|
|
|
|
end
|
|
|
|
)");
|
|
|
|
|
|
|
|
cgb.visit(block);
|
2022-09-09 05:44:50 +08:00
|
|
|
NotNull<Scope> rootScope{cgb.rootScope};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
2022-09-02 07:00:14 +08:00
|
|
|
NullModuleResolver resolver;
|
2022-09-09 05:44:50 +08:00
|
|
|
ConstraintSolver cs{&arena, singletonTypes, rootScope, "MainModule", NotNull(&resolver), {}, &logger};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
cs.run();
|
|
|
|
|
2022-07-01 07:29:02 +08:00
|
|
|
TypeId idType = requireBinding(rootScope, "id");
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
CHECK("<a>(a) -> a" == toString(idType));
|
|
|
|
}
|
|
|
|
|
|
|
|
TEST_CASE_FIXTURE(ConstraintGraphBuilderFixture, "proper_let_generalization")
|
|
|
|
{
|
|
|
|
AstStatBlock* block = parse(R"(
|
|
|
|
local function a(c)
|
|
|
|
local function d(e)
|
|
|
|
return c
|
|
|
|
end
|
|
|
|
|
|
|
|
return d
|
|
|
|
end
|
|
|
|
|
|
|
|
local b = a(5)
|
|
|
|
)");
|
|
|
|
|
|
|
|
cgb.visit(block);
|
2022-09-09 05:44:50 +08:00
|
|
|
NotNull<Scope> rootScope{cgb.rootScope};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
ToStringOptions opts;
|
|
|
|
|
2022-09-02 07:00:14 +08:00
|
|
|
NullModuleResolver resolver;
|
2022-09-09 05:44:50 +08:00
|
|
|
ConstraintSolver cs{&arena, singletonTypes, rootScope, "MainModule", NotNull(&resolver), {}, &logger};
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
cs.run();
|
|
|
|
|
2022-07-01 07:29:02 +08:00
|
|
|
TypeId idType = requireBinding(rootScope, "b");
|
2022-06-04 04:32:20 +08:00
|
|
|
|
|
|
|
CHECK("<a>(a) -> number" == toString(idType, opts));
|
|
|
|
}
|
|
|
|
|
|
|
|
TEST_SUITE_END();
|