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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
|
do
local a
local a, b, c
local g
b, g = 23232, nil
end
do
local x = 1212
local something
something = function()
local x
x = 1212
end
end
do
local y, z
y = 2323
z = 2323
end
do
print("Nothing Here!")
end
do
local X, Y
local x = 3434
local y = 3434
X = 3434
Y = "yeah"
end
do
local x, y = "a", "b"
end
do
local x, y
x, y = "a", "b"
end
do
if something then
local x = 2323
end
end
do
local x
do
x = "one"
end
x = 100
do
x = "two"
end
end
do
local k, x, a, b, c
if what then
k = 10
end
x = 100
local _obj_0 = y
a, b, c = _obj_0.a, _obj_0.b, _obj_0.c
end
do
local a, b, c, d
a = 100
print("hi")
b = 200
c = 100
print("hi")
d = 200
d = 2323
end
do
local Uppercase, One, Two
local lowercase = 5
Uppercase = 3
do
local _class_0
local Five
local _base_0 = { }
if _base_0.__index == nil then
_base_0.__index = _base_0
end
_class_0 = setmetatable({
__init = function() end,
__base = _base_0,
__name = "One"
}, {
__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
local self = _class_0;
Five = 6
One = _class_0
end
local _class_0
local No
local _base_0 = { }
if _base_0.__index == nil then
_base_0.__index = _base_0
end
_class_0 = setmetatable({
__init = function() end,
__base = _base_0,
__name = "Two"
}, {
__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
local self = _class_0;
local _class_1
local _base_1 = { }
if _base_1.__index == nil then
_base_1.__index = _base_1
end
_class_1 = setmetatable({
__init = function() end,
__base = _base_1,
__name = "No"
}, {
__index = _base_1,
__call = function(cls, ...)
local _self_0 = setmetatable({ }, _base_1)
cls.__init(_self_0, ...)
return _self_0
end
})
_base_1.__class = _class_1
No = _class_1
Two = _class_0
end
do
local _list_0 = { }
for _index_0 = 1, #_list_0 do
local a = _list_0[_index_0]
local _ = a
end
end
do
local x
x = a or b
end
local g = 2323
|
