aboutsummaryrefslogtreecommitdiff
path: root/spec/outputs/test/constructor_promotion_spec.lua
blob: 5caa762980a027fc0805525289d64b0fdf406284 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
return describe("constructor promotion", function()
	it("should promote simple arguments to assignment", function()
		local Thing
		do
			local _class_0
			local _base_0 = { }
			if _base_0.__index == nil then
				_base_0.__index = _base_0
			end
			_class_0 = setmetatable({
				__init = function(self, name, age)
					self.name = name
					self.age = age
				end,
				__base = _base_0,
				__name = "Thing"
			}, {
				__index = _base_0,
				__call = function(cls, ...)
					local _self_0 = setmetatable({ }, _base_0)
					cls.__init(_self_0, ...)
					return _self_0
				end
			})
			_base_0.__class = _class_0
			Thing = _class_0
		end
		local instance = Thing("Alice", 30)
		assert.same(instance.name, "Alice")
		return assert.same(instance.age, 30)
	end)
	it("should promote multiple arguments", function()
		local Point
		do
			local _class_0
			local _base_0 = { }
			if _base_0.__index == nil then
				_base_0.__index = _base_0
			end
			_class_0 = setmetatable({
				__init = function(self, x, y, z)
					self.x = x
					self.y = y
					self.z = z
				end,
				__base = _base_0,
				__name = "Point"
			}, {
				__index = _base_0,
				__call = function(cls, ...)
					local _self_0 = setmetatable({ }, _base_0)
					cls.__init(_self_0, ...)
					return _self_0
				end
			})
			_base_0.__class = _class_0
			Point = _class_0
		end
		local p = Point(1, 2, 3)
		assert.same(p.x, 1)
		assert.same(p.y, 2)
		return assert.same(p.z, 3)
	end)
	return it("should work with multiple parameters", function()
		local Container
		do
			local _class_0
			local _base_0 = { }
			if _base_0.__index == nil then
				_base_0.__index = _base_0
			end
			_class_0 = setmetatable({
				__init = function(self, a, b, c)
					self.a = a
					self.b = b
					self.c = c
				end,
				__base = _base_0,
				__name = "Container"
			}, {
				__index = _base_0,
				__call = function(cls, ...)
					local _self_0 = setmetatable({ }, _base_0)
					cls.__init(_self_0, ...)
					return _self_0
				end
			})
			_base_0.__class = _class_0
			Container = _class_0
		end
		local c = Container()
		assert.same(c.a, nil)
		assert.same(c.b, nil)
		return assert.same(c.c, nil)
	end)
end)