anchor.diff:  start( Driver, Parameters ) ->
       { _, Tag } = From = from(),
       Pid = spawn( fun() -> enter_loop( Driver, Parameters, From ) end ),
  -    wait_start( { Pid, Tag } ).
  +    wait( { Pid, Tag } ).
   
   -spec start_link( binary(), [ binary() ] ) -> { ok, pid() } | { error, term() }.
   start_link( Driver, Parameters ) ->
       { _, Tag } = From = from(),
       Pid = spawn_link( fun() -> enter_loop( Driver, Parameters, From ) end ),
  -    wait_start( { Pid, Tag } ).
  +    wait( { Pid, Tag } ).
   
   -spec start_async( binary(), [ binary() ] ) -> { ok, { pid(), reference() } }.
   start_async( Driver, Parameters ) ->
  
positive.code: 
      { ok, From2 } = request_event_async( Pid, "SomeEvent" ),
      ResEvent = receive
          { { event, Res2 }, From2 } -> Res2
      after
          ?DRIVER_TIMEOUT -> timeout
      end,
  
      { ok, From3 } = stop_async( Pid ),
      ResStop = receive
          { { stopped, Res3 }, From3 } -> Res3
      after
          ?DRIVER_TIMEOUT -> timeout
      end,
  
negative.code: server_scenario_async_test_() ->
      { ok, From } = start_test_server_async( "echo.sh" ),
      { ok, Pid } = receive
          { Res1, From } -> Res1
      after
          ?DRIVER_TIMEOUT -> timeout
      end,
  