anchor.diff:  	].
   
   
  -test_kill_driver( ) ->
  +test_kill_driver() ->
   	{ ok, Port } = start_test_driver( "stuck.sh" ),
   	Pid = erlang:port_info( Port, os_pid ),
   	stop_driver( Port ),
  
positive.code: 			, ?_assertThrow( unsafe_relative_path, driver_path( unsafe ) )
  			] } }.
  
  driver_start_stop_test_( ) ->
  	{ "start and stop driver"
  	, fun test_start_stop_driver/0 }.
  
  
  stuck_driver_test_( ) ->
  	{ "kill stuck driver"
  	, fun test_kill_driver/0 }.
  
  
  get_event_test_( ) ->
  	{ "reply to event poll"
  	, fun test_get_event/0 }.
  
  
negative.code: 	].
  
  
  test_get_event() ->
  	{ ok, Port } = start_test_driver( "echo.sh" ),
  	Res = get_event( Port, "SomeEvent" ),
  	ExpData = "EVENT\nSomeEvent\nOK\n",
  