lots of work towards flattening the records. stalled at ezic_rule:next_event/4

This commit is contained in:
aj
2010-11-07 18:32:37 -08:00
parent c795abf2b6
commit 9ad8f3c826
12 changed files with 479 additions and 115 deletions

14
test/ezic_zone_tests.erl Normal file
View File

@@ -0,0 +1,14 @@
-module(ezic_zone_tests).
-include("include/ezic.hrl").
-include_lib("eunit/include/eunit.hrl").
split_by_name_test_() ->
AZones= [A=#zone{name=a}, #zone{name=a}, #zone{name=a}],
BZones= [B=#zone{name=b}, #zone{name=b}, #zone{name=b}],
AllZones= lists:merge(AZones, BZones),
[
?_assertEqual({AZones, BZones}, ezic_zone:split_by_name(A, AllZones))
, ?_assertEqual({BZones, AZones}, ezic_zone:split_by_name(B, AllZones))
, ?_assertEqual({[], AllZones}, ezic_zone:split_by_name(#zone{name=c}, AllZones))
].