/*
 * key に対応するレコードがあれば、そのレコードのスコアを返す
 *
 * === Argument
 * key [String] :: キー
 *
 * === Return
 * Integer
 */
static VALUE records_find(VALUE obj, VALUE key)
{
    sen_records *recs;
    Data_Get_Struct(obj, sen_records, recs);
    Check_Type(key, T_STRING);
    return INT2NUM(sen_records_find(recs, RSTRING_PTR(key)));
}