/*
 * call-seq:
 *  add(str, weight)
 *
 * 重みをつけて文字列を追加する。
 *
 * === Argument
 * str [String] :: 追加する文字列
 * weight [Integer] :: 重み
 *
 * === Return
 * self
 */
static VALUE values_add(VALUE obj, VALUE str, VALUE weight)
{
    sen_values *values;
    sen_rc rc;
    Data_Get_Struct(obj, sen_values, values);
    Check_Type(str, T_STRING);
    rc = sen_values_add(values, RSTRING_PTR(str), RSTRING_LEN(str), NUM2UINT(weight));
    if (rc != sen_success)
        senna_error(rc, "sen_values_add failed: str=%.32s", RSTRING_PTR(str));
    return obj;
}