beholder.lua/spec/acceptance.lua
2011-10-30 12:33:34 +01:00

100 lines
2.1 KiB
Lua

local beholder = require 'beholder'
describe("Acceptance", function()
before(function()
beholder:reset()
end)
test("Normal behavior", function()
local counter = 0
local id = beholder:observe("EVENT", function() counter = counter + 1 end)
beholder:trigger("EVENT")
beholder:trigger("EVENT")
assert_equal(counter, 2)
beholder:stopObserving(id)
beholder:trigger("EVENT")
assert_equal(counter, 2)
end)
test("several actions on the same event", function()
local counter1, counter2 = 0,0
local id1 = beholder:observe("EVENT", function() counter1 = counter1 + 1 end)
local id2 = beholder:observe("EVENT", function() counter2 = counter2 + 1 end)
beholder:trigger("EVENT")
beholder:trigger("EVENT")
assert_equal(counter1, 2)
assert_equal(counter2, 2)
beholder:stopObserving(id1)
beholder:trigger("EVENT")
assert_equal(counter1, 2)
assert_equal(counter2, 3)
beholder:stopObserving(id2)
beholder:trigger("EVENT")
assert_equal(counter1, 2)
assert_equal(counter2, 3)
end)
test("composed events", function()
local counter = 0
local lastKey = ""
local enterPressed = false
local escapePressed = false
beholder:observe("KEYPRESS", function() counter = counter + 1 end)
beholder:observe("KEYPRESS", function(key) lastKey = key end)
beholder:observe("KEYPRESS", "enter", function() enterPressed = true end)
beholder:trigger("KEYPRESS", "space")
assert_equal(counter, 1)
assert_equal(lastKey, "space")
assert_false(enterPressed)
assert_false(escapePressed)
beholder:trigger("KEYPRESS", "enter")
assert_equal(counter, 2)
assert_equal(lastKey, "enter")
assert_true(enterPressed)
assert_false(escapePressed)
end)
test("nil events", function()
local counter = 0
local id = beholder:observe(function(_, x) counter = counter + x end)
beholder:trigger("FOO", 1)
beholder:trigger("BAR", 2)
assert_equal(3, counter)
beholder:stopObserving(id)
beholder:observe("BAZ", function() counter = counter + 1 end)
beholder:trigger()
assert_equal(4, counter)
end)
end)