diff options
Diffstat (limited to 'testes')
-rw-r--r-- | testes/events.lua | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/testes/events.lua b/testes/events.lua index 8d8563b9..5360ac30 100644 --- a/testes/events.lua +++ b/testes/events.lua | |||
@@ -248,6 +248,15 @@ end | |||
248 | test(Op(1), Op(2), Op(3)) | 248 | test(Op(1), Op(2), Op(3)) |
249 | 249 | ||
250 | 250 | ||
251 | do -- test nil as false | ||
252 | local x = setmetatable({12}, {__eq= function (a,b) | ||
253 | return a[1] == b[1] or nil | ||
254 | end}) | ||
255 | assert(not (x == {20})) | ||
256 | assert(x == {12}) | ||
257 | end | ||
258 | |||
259 | |||
251 | -- test `partial order' | 260 | -- test `partial order' |
252 | 261 | ||
253 | local function rawSet(x) | 262 | local function rawSet(x) |