511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
|
# File 'ext/native_server.c', line 511
VALUE mc_prepend(VALUE self, VALUE key, VALUE value) {
memcached_st *mc;
static memcached_return_t result;
Data_Get_Struct(self, memcached_st, mc);
key = StringValue(key);
if (!use_binary(mc)) key = escape_key(key, NULL);
value = StringValue(value);
result = memcached_prepend(mc, RSTRING_PTR(key), RSTRING_LEN(key), RSTRING_PTR(value), RSTRING_LEN(value), 0, 0);
if (result == MEMCACHED_SUCCESS) {
return Qtrue;
} else if(result == MEMCACHED_NOTSTORED) {
return Qfalse;
} else {
return throw_error(&result);
}
}
|