http://www.jb51.net/article/64711.htm
sort 可以将 table 数组部分的元素进行排序,需要提供 comp 函数,comp(a, b) 如果 a 应该排到 b 前面,则 comp 要返回 true 。
注意,对于 a==b 的情况,一定要返回 false :
local function comp(a,b)
return a <= b
end
table.sort(t,comp)
-- 错误,可能出现异常:attempt to compare number with nil
local function comp(a,b)
if a == nil or b == nil then
return false
end
return a <= b
end
table.sort(t,comp)
-- 错误,可能出现异常:invalid order function for sorting
-- 也可能不报这个异常,但结果是错误的;
之所以 a==b 返回true 会引发这些问题,是因为 table.sort 在实现快速排序时没有做边界检测:
for (;;) {
while (lua_rawgeti(L, 1, ++i), sort_comp(L, -1, -2)) { // 未检测边界, i 会一直增加
if (i>=u) luaL_error(L, "invalid order function for sorting");
lua_pop(L, 1);
}
while (lua_rawgeti(L, 1, --j), sort_comp(L, -3, -1)) { // 未检测边界, j 会一直减少
if (j<=l) luaL_error(L, "invalid order function for sorting");
lua_pop(L, 1);
}
if (j<i) {
lua_pop(L, 3);
break;
}
set2(L, i, j);
}
看以上代码,如果 a==b 时返回 true 且边界上的几个值是相等的话, sort_comp 就无法阻止 i 继续增长,直到超出边界引发异常 attempt to compare number with nil;即使我们对 a 和 b 进行非空判断,也会因为 i 超过边界而引发异常 invalid order function for sorting
http://www.java123.net/v/387365.html
总结:不能用<=,不然会报错。当<与==拆分的时候,==(如果是最后一个if语句)必须要返回false。
> tbl = {{4,1},{4,2},{3,3},{5,3},{5,1},{3,2},{5,4},{5,5},{5,1},{5,3},{3,3},{4,2},{3,2}}
> function comp(a,b)
>> if a[1] <= b[1] then
>> return true
>> else
>> return false
>> end
>> end
> table.sort(tbl, comp)
stdin:1: invalid order function for sorting
stack traceback:
[C]: in function 'sort'
stdin:1: in main chunk
[C]: in ?
> table.sort(tbl,comp)
stdin:1: invalid order function for sorting
stack traceback:
[C]: in function 'sort'
stdin:1: in main chunk
[C]: in ?
> function comp(a,b)
if a[1] < b[1] then
return true
else
return false
end
end
> table.sort(tbl,comp)
> for i, _t in pairs(tbl) do
>> print(i, _t[1], _t[2])
>> end
1 3 3
2 3 2
3 3 3
4 3 2
5 4 1
6 4 2
7 4 2
8 5 3
9 5 4
10 5 1
11 5 3
12 5 1
13 5 5
> tbl = {{4,1},{4,2},{3,3},{5,3},{5,1},{3,2},{5,4},{5,5},{5,1},{5,3},{3,3},{4,2},{3,2}}
> function comp(a,b)
if a[1] < b[1] then
return true
elseif a[1] == b[1] then
return false
end
end
> function comp(a,b)
if a[1] < b[1] then
return true
elseif a[1] == b[1] then
return false
else return false end
end
> for i, _t in pairs(tbl) do
print(i, _t[1], _t[2])
end
1 4 1
2 4 2
3 3 3
4 5 3
5 5 1
6 3 2
7 5 4
8 5 5
9 5 1
10 5 3
11 3 3
12 4 2
13 3 2
> function comp(a,b)
if a[1] < b[1] then
return true
else
return false
end
end
> table.sort(tbl,comp)
> for i, _t in pairs(tbl) do