anchor.diff:  % API functions
   -export(
   	[ start/0, start_link/0, stop/1
  -	, start_device/3, stop_device/2, list_devices/1
  +	, start_device/2, stop_device/2, list_devices/1
   	] ).
   
   % gen_server callbacks
  
positive.code: 	, [ ?_assertEqual( <<"dummy">>, Driver ) || Driver <- GetDeviceFields( driver, Result ) ]
  	].
  
  
  -endif. % TEST
  
negative.code: 	{ ok, State }.
  
  
  handle_call( { start_device, Configuration }, _From, State ) ->
  	case do_start_device( Configuration ) of
  		{ ok, Device } ->
  				Devices = orddict:store( Device#device.id, Device, State#state.devices ),
  				NewState = State#state{ devices = Devices },
  