anchor.diff:                  when is_binary(Value) ->
                   mcerlang:add(Process,
                       Key, Value, ?MEMCACHED_TIMEOUT);
  -            {'add_exp', Key, Value, Expiration}
  +            {'add', Key, Value, Expiration}
                   when is_binary(Value), is_integer(Expiration) ->
                   mcerlang:add_exp(Process,
                       Key, Value, Expiration, ?MEMCACHED_TIMEOUT);
  
positive.code:                 when is_binary(Value) ->
                  mcerlang:replace(Process,
                      Key, Value, ?MEMCACHED_TIMEOUT);
              {'replace_exp', Key, Value, Expiration}
                  when is_binary(Value), is_integer(Expiration) ->
                  mcerlang:replace_exp(Process,
                      Key, Value, Expiration, ?MEMCACHED_TIMEOUT);
              {'delete', Key} ->
                  mcerlang:delete(Process,
                      Key, ?MEMCACHED_TIMEOUT);
              {'increment_exp', Key, Value, Initial, Expiration}
                  when is_binary(Value), is_binary(Initial),
                       is_integer(Expiration) ->
                  mcerlang:increment_exp(Process,
                      Key, Value, Initial, Expiration, ?MEMCACHED_TIMEOUT);
              {'decrement_exp', Key, Value, Initial, Expiration}
                  when is_binary(Value), is_binary(Initial),
                       is_integer(Expiration) ->
                  mcerlang:decrement_exp(Process,
  
negative.code:             {'flush'} ->
                  mcerlang:flush(Process,
                      ?MEMCACHED_TIMEOUT);
              {'flush', Expiration}
                  when is_integer(Expiration) ->
                  mcerlang:flush_exp(Process,
                      Expiration, ?MEMCACHED_TIMEOUT);
  