aboutsummaryrefslogtreecommitdiff
path: root/spec/outputs/unicode/comprehension.lua
blob: 60e490fcb0b5dbe26967438ab69405ca64034068 (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
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
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
local _u5217_u8868 = {
	1,
	2,
	3,
	4,
	5,
	6
}
local _u8f93_u51fa
do
	local _tbl_0 = { }
	for _u5143_u7d20 in _u5bf9_u8c61_u6570_u7ec4 do
		_tbl_0[_u5143_u7d20] = _u5143_u7d20 * 2
	end
	_u8f93_u51fa = _tbl_0
end
local _u5b57_u5178x = {
	["你好"] = "世界",
	["好吧"] = 2323
}
local _u590d_u5236
do
	local _tbl_0 = { }
	for _u952e, _u503c in pairs(_u5bf9_u8c61x) do
		if _u952e ~= "好吧" then
			_tbl_0[_u952e] = _u503c
		end
	end
	_u590d_u5236 = _tbl_0
end
local __u65e0_u6548_u53d8_u91cf
do
	local _tbl_0 = { }
	for _u5143_u7d20 in _u662f_u7684 do
		local _key_0, _val_0 = _u89e3_u5305(_u5143_u7d20)
		_tbl_0[_key_0] = _val_0
	end
	__u65e0_u6548_u53d8_u91cf = _tbl_0
end
do
	local _tbl_0 = { }
	local _list_0 = _u662f_u7684
	for _index_0 = 1, #_list_0 do
		local _u5143_u7d20 = _list_0[_index_0]
		local _key_0, _val_0 = _u89e3_u5305(_u5143_u7d20)
		_tbl_0[_key_0] = _val_0
	end
	__u65e0_u6548_u53d8_u91cf = _tbl_0
end
do
	local _tbl_0 = { }
	for _u5143_u7d20 in _u662f_u7684 do
		local _key_0, _val_0 = _u5143_u7d20_u5143_u7d20
		_tbl_0[_key_0] = _val_0
	end
	__u65e0_u6548_u53d8_u91cf = _tbl_0
end
do
	local _tbl_0 = { }
	local _list_0 = {
		{
			1,
			2
		},
		{
			3,
			4
		}
	}
	for _index_0 = 1, #_list_0 do
		local x_u5bf9_u8c61 = _list_0[_index_0]
		local _key_0, _val_0 = _u89e3_u5305((function()
			local _accum_0 = { }
			local _len_0 = 1
			for _u8ba1_u6570, _u5bf9_u8c61 in ipairs(x_u5bf9_u8c61) do
				_accum_0[_len_0] = _u5bf9_u8c61 * _u8ba1_u6570
				_len_0 = _len_0 + 1
			end
			return _accum_0
		end)())
		_tbl_0[_key_0] = _val_0
	end
	__u65e0_u6548_u53d8_u91cf = _tbl_0
end
local _u53d8_u91cf1
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u8ba1_u6570 = 1, 10 do
		_accum_0[_len_0] = _u8ba1_u6570
		_len_0 = _len_0 + 1
	end
	_u53d8_u91cf1 = _accum_0
end
local _u53d8_u91cf2
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u8ba1_u6570 = 1, 10 do
		if _u8ba1_u6570 % 2 == 1 then
			_accum_0[_len_0] = _u8ba1_u6570
			_len_0 = _len_0 + 1
		end
	end
	_u53d8_u91cf2 = _accum_0
end
local _u53d8_u91cfaa
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u8ba1_u6570x = 1, 10 do
		for _u8ba1_u6570y = 5, 14 do
			_accum_0[_len_0] = {
				_u8ba1_u6570x,
				_u8ba1_u6570y
			}
			_len_0 = _len_0 + 1
		end
	end
	_u53d8_u91cfaa = _accum_0
end
local _u53d8_u91cfbb
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u5143_u7d20 in _u5bf9_u8c61y do
		for _u8ba1_u6570i = 1, 10 do
			_accum_0[_len_0] = _u5bf9_u8c61y
			_len_0 = _len_0 + 1
		end
	end
	_u53d8_u91cfbb = _accum_0
end
local _u53d8_u91cfcc
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u8ba1_u6570 = 1, 10 do
		for _u5143_u7d20 in _u5bf9_u8c61y do
			_accum_0[_len_0] = _u5bf9_u8c61y
			_len_0 = _len_0 + 1
		end
	end
	_u53d8_u91cfcc = _accum_0
end
local _u53d8_u91cfdd
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u8ba1_u6570 = 1, 10 do
		if _u9177 then
			for _u5143_u7d20 in _u5bf9_u8c61y do
				if _u53d8_u91cfx > 3 then
					if _u53d8_u91cfc + 3 then
						_accum_0[_len_0] = _u5bf9_u8c61y
						_len_0 = _len_0 + 1
					end
				end
			end
		end
	end
	_u53d8_u91cfdd = _accum_0
end
do
	local _tbl_0 = { }
	for _u8ba1_u6570 = 1, 10 do
		_tbl_0["你好"] = "世界"
	end
	__u65e0_u6548_u53d8_u91cf = _tbl_0
end
local _u53d8_u91cfj
do
	local _accum_0 = { }
	local _len_0 = 1
	for _des_0 in _u5f88_u591a_u4e1c_u897f do
		local _u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c = _des_0[1], _des_0[2], _des_0[3]
		_accum_0[_len_0] = _u5143_u7d20a
		_len_0 = _len_0 + 1
	end
	_u53d8_u91cfj = _accum_0
end
local _u53d8_u91cfk
do
	local _accum_0 = { }
	local _len_0 = 1
	local _list_0 = _u5f88_u591a_u4e1c_u897f
	for _index_0 = 1, #_list_0 do
		local _des_0 = _list_0[_index_0]
		local _u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c = _des_0[1], _des_0[2], _des_0[3]
		_accum_0[_len_0] = _u5143_u7d20a
		_len_0 = _len_0 + 1
	end
	_u53d8_u91cfk = _accum_0
end
local _u53d8_u91cfi
do
	local _accum_0 = { }
	local _len_0 = 1
	local _list_0 = _u5f88_u591a_u4e1c_u897f
	for _index_0 = 1, #_list_0 do
		local _des_0 = _list_0[_index_0]
		local _u4f60_u597d, _u4e16_u754c = _des_0["你好"], _des_0["世界"]
		_accum_0[_len_0] = _u4f60_u597d
		_len_0 = _len_0 + 1
	end
	_u53d8_u91cfi = _accum_0
end
local _u53d8_u91cfhj
do
	local _tbl_0 = { }
	for _des_0 in _u5f88_u591a_u4e1c_u897f do
		local _u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c = _des_0[1], _des_0[2], _des_0[3]
		_tbl_0[_u5143_u7d20a] = _u5143_u7d20c
	end
	_u53d8_u91cfhj = _tbl_0
end
local _u53d8_u91cfhk
do
	local _tbl_0 = { }
	local _list_0 = _u5f88_u591a_u4e1c_u897f
	for _index_0 = 1, #_list_0 do
		local _des_0 = _list_0[_index_0]
		local _u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c = _des_0[1], _des_0[2], _des_0[3]
		_tbl_0[_u5143_u7d20a] = _u5143_u7d20c
	end
	_u53d8_u91cfhk = _tbl_0
end
local _u53d8_u91cfhi
do
	local _tbl_0 = { }
	local _list_0 = _u5f88_u591a_u4e1c_u897f
	for _index_0 = 1, #_list_0 do
		local _des_0 = _list_0[_index_0]
		local _u4f60_u597d, _u4e16_u754c = _des_0["你好"], _des_0["世界"]
		_tbl_0[_u4f60_u597d] = _u4e16_u754c
	end
	_u53d8_u91cfhi = _tbl_0
end
for _des_0 in _u5f88_u591a_u4e1c_u897f do
	local _u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c = _des_0[1], _des_0[2], _des_0[3]
	_u6ca1_u9519(_u5143_u7d20a, _u5143_u7d20b, _u5143_u7d20c)
end
do
	local _accum_0 = { }
	local _len_0 = 1
	local _max_0 = 3 + 4
	for _index_0 = 1 + 2, _max_0 < 0 and #_u5217_u8868 + _max_0 or _max_0 do
		local _u9879_u76ee = _u5217_u8868[_index_0]
		_accum_0[_len_0] = _u9879_u76ee
		_len_0 = _len_0 + 1
	end
	__u65e0_u6548_u53d8_u91cf = _accum_0
end
do
	local _accum_0 = { }
	local _len_0 = 1
	local _max_0 = 2 - _u4e1c_u897f[4]
	for _index_0 = _u4f60_u597d() * 4, _max_0 < 0 and #_u5217_u8868 + _max_0 or _max_0 do
		local _u9879_u76ee = _u5217_u8868[_index_0]
		_accum_0[_len_0] = _u9879_u76ee
		_len_0 = _len_0 + 1
	end
	__u65e0_u6548_u53d8_u91cf = _accum_0
end
do
	local _accum_0 = { }
	local _len_0 = 1
	for _u9879_u76ee in _u5217_u8868 do
		if _u9879_u76ee ~= nil then
			_accum_0[_len_0] = _u9879_u76ee["调用"](_u9879_u76ee, 123)
		end
		_len_0 = _len_0 + 1
	end
	_u5217_u8868 = _accum_0
end
return nil