anchor.diff:  
   ssp_camera_slot_allocate (Addr) ->
     gen_server:call (?REGNAME, {ssp_camera_slot_allocate, Addr}).
  +
  +ssp_camera_slot_allocate (Addr, Slot) ->
  +  gen_server:call (?REGNAME, {ssp_camera_slot_allocate, Addr, Slot}).
   
   
   %% gen_server callbacks
  
positive.code:     '$end_of_table' ->
        {error, no_free_slots} end,
  
    {reply, Result, State}.
  
  
  handle_cast (_Request, State) ->
  
negative.code: -export ([start_link/0, dump/0, action_lookup/2, action_lookup/1,
            action_is_special/1, action_set/3, ssp_camera_init/1,
            ssp_camera_slot_free/2, ssp_camera_slot_is_allocated/2,
            ssp_camera_slot_allocate/1, ssp_camera_slot_allocate/2]).
  
  %% gen_server callbacks
  -export ([init/1, terminate/2, handle_call/3, handle_cast/2, handle_info/2,
  