Permalink
Browse files

Minor addition to test that 'first' supervisor wasn't registered.

  • Loading branch information...
1 parent 0aab0da commit 3937718e094d62469c0e005de5950c595a6d4145 @yrashk yrashk committed Jul 12, 2011
Showing with 3 additions and 1 deletion.
  1. +3 −1 test/gen_supervisor_tests.erl
View
4 test/gen_supervisor_tests.erl
@@ -3,7 +3,9 @@
t_starts_supervisor() ->
?assertMatch([{some_sup, _, _, _},{first, _, _, _}], supervisor:which_children(test_sup)),
- ?assertMatch(Pid when is_pid(Pid), whereis(some_sup)).
+ ?assertMatch(Pid when is_pid(Pid), whereis(some_sup)),
+ ?assertEqual(undefined, whereis(first)).
+
t_nested_supervisor() ->
[{some_sup, Pid, _, _},{first, _, _, _}] = supervisor:which_children(test_sup),

0 comments on commit 3937718

Please sign in to comment.