working testcase

This commit is contained in:
Enno Rehling 2009-09-12 10:23:16 +00:00
parent b97a2d4d26
commit f853e8ea66

View file

@ -646,10 +646,12 @@ function test_control()
u1.building = b u1.building = b
u2.building = b u2.building = b
update_owners() update_owners()
assert(b.owner==u1)
u1:clear_orders() u1:clear_orders()
u1:add_order() u1:add_order("GIB " .. itoa36(u2.id) .. " KOMMANDO")
u1:add_order("VERLASSE")
process_orders() process_orders()
assert(b.owner==u2)
end end
function test_storage() function test_storage()
@ -709,6 +711,7 @@ tests = {
} }
mytests = { mytests = {
["morale"] = test_morale, ["morale"] = test_morale,
["control"] = test_control,
["taxes"] = test_taxes, ["taxes"] = test_taxes,
["owners"] = test_owners ["owners"] = test_owners
} }