eunit test for timeout

Question

Как проверить, что gen_fsm действительно тайм-аут с eunit?

{ok, GH} = gen_fsm:start_link(myFSM, [], []), 
//after 15 sec it should timeout if no messages received. 
//What must I write here to test it? 

Answer 1

Я считаю, что это одно решение:

{ok, GH} = gen_fsm:start_link(myFSM, [], []), 
Ref = erlang:monitor(process,GH), 
receive 
    {'DOWN', Ref, process, GH, normal} -> 
     test_passed 
after 
    15000 -> 
     ?assert("FSM did not die.") % will always fail 
end.