rroonga 3.0.2 → 3.0.3

data/doc/text/news.textile

@@ -1,5 +1,28 @@
 h1. NEWS
 
+h2(#3-0-3). 3.0.3: 2013-07-04
+
+h3. Improvements
+
+* Required groonga >= 3.0.5.
+* Added an error check for creating a result table of {Groonga::Table#select}.
+* Added {Groonga::Operator::AND_NOT}.
+* Deprecated {Groonga::Operator::BUT} because groonga deprecated it.
+  Use {Groonga::Operator::AND_NOT} instead.
+* Added {Groonga::Array#unblock}.
+* Added @:max_n_sub_records@ option to {Groonga::Table#group}.
+* Added {Groonga::Table#each_sub_record}.
+* Supported groonga to Ruby conversion for vector value.
+* Added @:reference => true@ option to {Groonga::Expression#define_variable}
+  that defines reference type variable.
+* Added {Groonga::Record#sub_records} that returns sub records for the record.
+  Sub records is a {Groonga::SubRecords} instance.
+
+h3. Fixes
+
+* Fixed {Groonga::Expression#[]} return type. It returns {Groonga::Variable}
+  instead of value itself. CAUTION: It is a backward incompatible change.
+
 h2(#3-0-2). 3.0.2: 2013-05-29
 
 h3. Improvements

data/ext/groonga/extconf.rb

@@ -141,10 +141,20 @@ def extract_groonga_win32_binary(major, minor, micro)
   message(" done\n")
 end
 
+def run_command(start_message, command)
+  message(start_message)
+  if xsystem(command)
+    message(" done\n")
+  else
+    message(" failed\n")
+    exit(false)
+  end
+end
+
 def configure_command_line(prefix)
   command_line = ["./configure"]
   debug_build_p = ENV["RROONGA_DEBUG_BUILD"] == "yes"
-  debug_flags = ["CFLAGS=-ggdb3 -O0", "CXXFLAGS=-ggdb3 -O0"]
+  debug_flags = ["CFLAGS=-g3 -O0", "CXXFLAGS=-g3 -O0"]
   command_line.concat(debug_flags) if debug_build_p
   command_line << "--prefix=#{prefix}"
   command_line << "--disable-static"
@@ -155,10 +165,37 @@ def configure_command_line(prefix)
   escaped_command_line.join(" ")
 end
 
-def build_groonga(major, minor, micro)
+def install_for_gnu_build_system(install_dir)
+  run_command("configuring...",
+              configure_command_line(install_dir))
+  run_command("building (maybe long time)...",
+              "make")
+  run_command("installing...",
+              "make install")
+end
+
+def build_groonga_from_git(major, minor, micro)
+  message("removing old cloned repository...")
+  FileUtils.rm_rf("groonga")
+  message(" done\n")
+
+  run_command("cloning...",
+              "git clone --depth 1 https://github.com/groonga/groonga")
+
+  Dir.chdir("groonga") do
+    run_command("running autogen.sh...",
+                "./autogen.sh")
+    install_for_gnu_build_system(local_groonga_install_dir)
+  end
+
+  message("removing cloned repository...")
+  FileUtils.rm_rf("groonga")
+  message(" done\n")
+end
+
+def build_groonga_from_tar_gz(major, minor, micro)
   tar_gz = "groonga-#{major}.#{minor}.#{micro}.tar.gz"
   url = "http://packages.groonga.org/source/groonga/#{tar_gz}"
-  install_dir = local_groonga_install_dir
 
   download(url)
 
@@ -172,29 +209,7 @@ def build_groonga(major, minor, micro)
 
   groonga_source_dir = "groonga-#{major}.#{minor}.#{micro}"
   Dir.chdir(groonga_source_dir) do
-    message("configuring...")
-    if xsystem(configure_command_line(install_dir))
-      message(" done\n")
-    else
-      message(" failed\n")
-      exit(false)
-    end
-
-    message("building (maybe long time)...")
-    if xsystem("make")
-      message(" done\n")
-    else
-      message(" failed\n")
-      exit(false)
-    end
-
-    message("installing...")
-    if xsystem("make install")
-      message(" done\n")
-    else
-      message(" failed\n")
-      exit(false)
-    end
+    install_for_gnu_build_system(local_groonga_install_dir)
   end
 
   message("removing source...")
@@ -206,6 +221,14 @@ def build_groonga(major, minor, micro)
   message(" done\n")
 end
 
+def build_groonga(major, minor, micro)
+  if RequiredGroongaVersion::RELEASED_DATE > Time.now
+    build_groonga_from_git(major, minor, micro)
+  else
+    build_groonga_from_tar_gz(major, minor, micro)
+  end
+end
+
 unless PKGConfig.have_package(package_name, major, minor, micro)
   unless have_local_groonga?(package_name, major, minor, micro)
     install_groonga_locally(major, minor, micro)

data/ext/groonga/rb-grn-array.c

@@ -326,7 +326,7 @@ rb_grn_array_push (VALUE self)
 }
 
 /*
- * Pulles a record from the array. The required values should be
+ * Pulls a record from the array. The required values should be
  * retrieved in the given block.
  *
  * If {Groonga::Array#push} failes to fill values of the pushed
@@ -353,6 +353,21 @@ rb_grn_array_push (VALUE self)
  *     p pulled_record.nil? # => true
  *   end
  *
+ * Note that your signal handlers can't be ran while a pull
+ * operation. You need to use {Groonga::Array#unblock} from
+ * another process to unblock the pull operation. If you call
+ * {Groonga::Array#unblock}, signal handler can be ran.
+ *
+ * @example Signal handler isn't called
+ *   queue = Groonga::Array.open(:name => "CrawlURLQueue")
+ *   trap(:INT) do
+ *     p :not_called!
+ *   end
+ *   queue.pull do |record|
+ *     # Send SIGINT while blocking the pull operation.
+ *     # The signal handler isn't called.
+ *   end
+ *
  * @see Groonga::Array#push Examples exist in the push documentation.
  *
  * @overload pull(options={})
@@ -406,6 +421,45 @@ rb_grn_array_pull (int argc, VALUE *argv, VALUE self)
     return data.record;
 }
 
+/*
+ * Unblocks all {Groonga::Array#pull} operations for the array.
+ *
+ * @example Pull, unblock and signal
+ *   # pull.rb
+ *   queue = Groonga::Array.open(:name => "CrawlURLQueue")
+ *   trap(:INT) do
+ *     p :called!
+ *   end
+ *   queue.pull do |record|
+ *     # 1. Send SIGINT while blocking the pull operation.
+ *     #    The signal handler isn't called.
+ *     # 2. Run unblock.rb.
+ *     #    The signal handler is called!
+ *   end
+ *
+ *   # unblock.rb
+ *   queue = Groonga::Array.open(:name => "CrawlURLQueue")
+ *   queue.unblock
+ *
+ * @see Groonga::Array#pull
+ *
+ * @overload unblock
+ *   @return [void]
+ *
+ */
+static VALUE
+rb_grn_array_unblock (VALUE self)
+{
+    grn_ctx *context = NULL;
+    grn_obj *table;
+
+    table = SELF(self, &context);
+
+    grn_array_unblock(context, (grn_array *)table);
+
+    return Qnil;
+}
+
 void
 rb_grn_init_array (VALUE mGrn)
 {
@@ -417,4 +471,5 @@ rb_grn_init_array (VALUE mGrn)
     rb_define_method(rb_cGrnArray, "add", rb_grn_array_add, -1);
     rb_define_method(rb_cGrnArray, "push", rb_grn_array_push, 0);
     rb_define_method(rb_cGrnArray, "pull", rb_grn_array_pull, -1);
+    rb_define_method(rb_cGrnArray, "unblock", rb_grn_array_unblock, 0);
 }

data/ext/groonga/rb-grn-column.c

@@ -228,7 +228,7 @@ rb_grn_column_get_local_name (VALUE self)
  *       - Groonga::Operator::AND :=
  *         マッチしたレコードのスコアを増加。マッチしなかった
  *         レコードを削除。 =:
- *       - Groonga::Operator::BUT :=
+ *       - Groonga::Operator::AND_NOT :=
  *         マッチしたレコードを削除。 =:
  *       - Groonga::Operator::ADJUST :=
  *         マッチしたレコードのスコアを増加。 =:

data/ext/groonga/rb-grn-double-array-trie.c

@@ -286,7 +286,7 @@ rb_grn_double_array_trie_s_create (int argc, VALUE *argv, VALUE klass)
  *     - Groonga::Operator::AND :=
  *       マッチしたレコードのスコアを増加。マッチしなかった
  *       レコードを削除。 =:
- *     - Groonga::Operator::BUT :=
+ *     - Groonga::Operator::AND_NOT :=
  *       マッチしたレコードを削除。 =:
  *     - Groonga::Operator::ADJUST :=
  *       マッチしたレコードのスコアを増加。 =:

data/ext/groonga/rb-grn-exception.c

@@ -57,7 +57,7 @@ static VALUE eGrnBrokenPipe;
 static VALUE eGrnDomainError;
 static VALUE eGrnResultTooLarge;
 static VALUE eGrnResourceDeadlockAvoided;
-static VALUE eGrnNoMemoryAvailable;
+VALUE rb_eGrnNoMemoryAvailable;
 static VALUE eGrnFilenameTooLong;
 static VALUE eGrnNoLocksAvailable;
 static VALUE eGrnFunctionNotImplemented;
@@ -211,7 +211,7 @@ rb_grn_rc_to_exception (grn_rc rc)
         exception = eGrnResourceDeadlockAvoided;
         break;
       case GRN_NO_MEMORY_AVAILABLE:
-        exception = eGrnNoMemoryAvailable;
+        exception = rb_eGrnNoMemoryAvailable;
         break;
       case GRN_FILENAME_TOO_LONG:
         exception = eGrnFilenameTooLong;
@@ -910,7 +910,7 @@ rb_grn_init_exception (VALUE mGrn)
      *
      * メモリが足りないときに発生する。
      */
-    eGrnNoMemoryAvailable =
+    rb_eGrnNoMemoryAvailable =
         rb_define_class_under(mGrn, "NoMemoryAvailable", rb_eGrnError);
 
     /*

data/ext/groonga/rb-grn-expression.c

@@ -112,10 +112,14 @@ rb_grn_expression_initialize (int argc, VALUE *argv, VALUE self)
  * @overload define_variable(options={})
  *   @param [::Hash] options The name and value
  *     pairs. Omitted names are initialized as the default value.
- *   @option options :name (false)
+ *   @option options :name [String] (nil)
  *     変数の名前。省略した場合は名前を付けない。
- *   @option options :domain
+ *   @option options :domain [Groonga::Table] (nil)
  *     テーブルを指定すると、そのテーブル用のレコードとして初期化する。
+ *   @option options :reference [Bool] (nil)
+ *     Initializes this variable as reference hold variable if
+ *     @:reference@ is true. Reference hold variable is GRN_PTR type
+ *     in groonga. You can't use @:reference@ with @:domain@.
  * @return [Groonga::Variable]
  *
  */
@@ -126,7 +130,7 @@ rb_grn_expression_define_variable (int argc, VALUE *argv, VALUE self)
     grn_obj *expression, *variable;
     char *name = NULL;
     unsigned name_size = 0;
-    VALUE options, rb_name, rb_domain, rb_variable;
+    VALUE options, rb_name, rb_domain, rb_variable, rb_reference;
 
     rb_scan_args(argc, argv, "01", &options);
 
@@ -137,6 +141,7 @@ rb_grn_expression_define_variable (int argc, VALUE *argv, VALUE self)
     rb_grn_scan_options(options,
 			"name", &rb_name,
 			"domain", &rb_domain,
+                        "reference", &rb_reference,
 			NULL);
 
     if (!NIL_P(rb_name)) {
@@ -151,6 +156,8 @@ rb_grn_expression_define_variable (int argc, VALUE *argv, VALUE self)
 	grn_id domain_id;
 	domain_id = NUM2UINT(rb_funcall(rb_domain, rb_intern("id"), 0));
 	GRN_RECORD_INIT(variable, 0, domain_id);
+    } else if (!NIL_P(rb_reference) && RVAL2CBOOL(rb_reference)) {
+        GRN_PTR_INIT(variable, 0, GRN_DB_OBJECT);
     }
 
     return rb_variable;
@@ -277,7 +284,7 @@ rb_grn_expression_append_operation (VALUE self, VALUE rb_operation,
  *       レコードはいずれかの条件にマッチすればいい。 =:
  *     - Groonga::Operator::AND :=
  *       レコードは全ての条件にマッチしなければならない。 =:
- *     - Groonga::Operator::BUT :=
+ *     - Groonga::Operator::AND_NOT :=
  *       最初の条件にレコードはマッチし、残りの条件にレコードは
  *       マッチしてはならない。 =:
  *
@@ -500,7 +507,7 @@ static VALUE
 rb_grn_expression_array_reference (VALUE self, VALUE rb_name_or_offset)
 {
     grn_ctx *context = NULL;
-    grn_obj *expression, *variable, *value;
+    grn_obj *expression, *variable;
     char *name = NULL;
     unsigned name_size = 0;
     int offset;
@@ -514,19 +521,17 @@ rb_grn_expression_array_reference (VALUE self, VALUE rb_name_or_offset)
         name = RSTRING_PTR(rb_name_or_offset);
         name_size = RSTRING_LEN(rb_name_or_offset);
         variable = grn_expr_get_var(context, expression, name, name_size);
-        return GRNBULK2RVAL(context, variable, NULL, self);
         break;
     case T_FIXNUM:
         offset = NUM2INT(rb_name_or_offset);
-        value = grn_expr_get_var_by_offset(context, expression, offset);
-        return GRNBULK2RVAL(context, value, NULL, self);
+        variable = grn_expr_get_var_by_offset(context, expression, offset);
         break;
     default:
         rb_raise(rb_eArgError, "xxx");
         break;
     }
 
-    return Qnil;
+    return GRNVARIABLE2RVAL(context, variable);
 }
 
 /* REMOVE ME */

data/ext/groonga/rb-grn-index-column.c

@@ -451,7 +451,7 @@ rb_grn_index_column_delete (int argc, VALUE *argv, VALUE self)
  * updated automatically by using @:source@ option of
  * {Groonga::Table#define_index_column}.
  *
- * @example Updates sentences of an article to index
+ * @example Updates sentences of an article in index
  *   articles = Groonga::Array.create(:name => "Articles")
  *   articles.define_column("title", "ShortText")
  *   articles.define_column("content", "Text")

data/ext/groonga/rb-grn-operator.c

@@ -35,15 +35,19 @@ rb_grn_operator_from_ruby_object (VALUE rb_operator)
         operator = GRN_OP_AND;
     } else if (rb_grn_equal_option(rb_operator, "but") ||
                rb_grn_equal_option(rb_operator, "not") ||
-               rb_grn_equal_option(rb_operator, "-")) {
-        operator = GRN_OP_BUT;
+               rb_grn_equal_option(rb_operator, "and-not") ||
+               rb_grn_equal_option(rb_operator, "and_not") ||
+               rb_grn_equal_option(rb_operator, "-") ||
+               rb_grn_equal_option(rb_operator, "&!")) {
+        operator = GRN_OP_AND_NOT;
     } else if (rb_grn_equal_option(rb_operator, "adjust") ||
                rb_grn_equal_option(rb_operator, ">")) {
         operator = GRN_OP_ADJUST;
     } else {
         rb_raise(rb_eArgError,
                  "operator should be one of "
-                 "[:or, :||, :and, :+, :&&, :but, :not, :-, :adjust, :>]: <%s>",
+                 "[:or, :||, :and, :+, :&&, :but, :not, :and_not, :-, :&!, "
+                 ":adjust, :>]: <%s>",
                  rb_grn_inspect(rb_operator));
     }
 
@@ -73,6 +77,9 @@ rb_grn_init_operator (VALUE mGrn)
                     UINT2NUM(GRN_OP_GET_VALUE));
     rb_define_const(rb_mGrnOperator, "AND",
                     UINT2NUM(GRN_OP_AND));
+    rb_define_const(rb_mGrnOperator, "AND_NOT",
+                    UINT2NUM(GRN_OP_AND_NOT));
+    /* Just for backward compatiblity. TODO: REMOVE ME! */
     rb_define_const(rb_mGrnOperator, "BUT",
                     UINT2NUM(GRN_OP_BUT));
     rb_define_const(rb_mGrnOperator, "OR",

data/ext/groonga/rb-grn-patricia-trie.c

@@ -274,7 +274,7 @@ rb_grn_patricia_trie_s_create (int argc, VALUE *argv, VALUE klass)
  *     - Groonga::Operator::AND :=
  *       マッチしたレコードのスコアを増加。マッチしなかった
  *       レコードを削除。 =:
- *     - Groonga::Operator::BUT :=
+ *     - Groonga::Operator::AND_NOT :=
  *       マッチしたレコードを削除。 =:
  *     - Groonga::Operator::ADJUST :=
  *       マッチしたレコードのスコアを増加。 =:

data/ext/groonga/rb-grn-table.c

@@ -18,16 +18,6 @@
 
 #include "rb-grn.h"
 
-/* GRN_TABLE_* should be defined in groonga.h. If they are defined in
- * groonga.h, the following defines are removed. */
-#ifndef GRN_TABLE_GROUPED
-#  define GRN_TABLE_GROUPED (0x01<<0)
-#endif
-#ifndef GRN_TABLE_IS_GROUPED
-#  define GRN_TABLE_IS_GROUPED(table) \
-    ((table)->header.impl_flags & GRN_TABLE_GROUPED)
-#endif
-
 grn_obj *grn_table_open(grn_ctx *ctx,
                         const char *name, unsigned name_size, const char *path);
 grn_obj *grn_column_open(grn_ctx *ctx, grn_obj *table,
@@ -70,10 +60,10 @@ rb_grn_table_to_ruby_object (grn_ctx *context, grn_obj *table,
 
 void
 rb_grn_table_finalizer (grn_ctx *context, grn_obj *object,
-			RbGrnTable *rb_grn_table)
+                        RbGrnTable *rb_grn_table)
 {
     if (context && rb_grn_table->value)
-	grn_obj_unlink(context, rb_grn_table->value);
+        grn_obj_unlink(context, rb_grn_table->value);
     rb_grn_table->value = NULL;
     rb_grn_table->columns = Qnil;
 }
@@ -1267,6 +1257,9 @@ rb_grn_table_sort (int argc, VALUE *argv, VALUE self)
  *   @return [[Groonga::Hash, ...]]
  * @overload group(key, options={})
  *   @return [Groonga::Hash]
+ * @option options :max_n_sub_records
+ *   グループ化した後のレコードのそれぞれについて最大 _:max_n_sub_records_ 件まで
+ *   そのグループに含まれる _table_ のレコードをサブレコードとして格納する。
  */
 static VALUE
 rb_grn_table_group (int argc, VALUE *argv, VALUE self)
@@ -1275,9 +1268,9 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
     grn_obj *table;
     grn_table_sort_key *keys;
     grn_table_group_result *results;
-    int i, n_keys, n_results;
+    int i, n_keys, n_results, max_n_sub_records = 0;
     grn_rc rc;
-    VALUE rb_keys, rb_options;
+    VALUE rb_keys, rb_options, rb_max_n_sub_records;
     VALUE *rb_group_keys;
     VALUE rb_results;
 
@@ -1296,6 +1289,13 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
         rb_group_keys = &rb_keys;
     }
 
+    rb_grn_scan_options(rb_options,
+                        "max_n_sub_records", &rb_max_n_sub_records,
+                        NULL);
+
+    if (!NIL_P(rb_max_n_sub_records))
+        max_n_sub_records = NUM2INT(rb_max_n_sub_records);
+
     keys = ALLOCA_N(grn_table_sort_key, n_keys);
     for (i = 0; i < n_keys; i++) {
         VALUE rb_sort_options, rb_key;
@@ -1331,13 +1331,10 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
     rb_results = rb_ary_new();
     for (i = 0; i < n_results; i++) {
         grn_obj *result;
-        grn_id range_id;
         VALUE rb_result;
 
-        range_id = grn_obj_get_range(context, keys[i].key);
-        result = grn_table_create(context, NULL, 0, NULL,
-                                  GRN_TABLE_HASH_KEY | GRN_OBJ_WITH_SUBREC,
-                                  grn_ctx_at(context, range_id), 0);
+        result = grn_table_create_for_group(context, NULL, 0, NULL,
+                                            keys[i].key, table, max_n_sub_records);
         results[i].table = result;
         results[i].key_begin = 0;
         results[i].key_end = 0;
@@ -1359,6 +1356,45 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
         return rb_results;
 }
 
+/*
+ * Iterates each sub records for the record _id_.
+ *
+ * @overload each_sub_record(id)
+ *   @yield [sub_record] Gives a sub record for the record _id_ to the block.
+ *   @yieldparam sub_record [Record] A sub record for the record _id_.
+ *   @return [void]
+ *
+ * @since 3.0.3
+ */
+static VALUE
+rb_grn_table_each_sub_record (VALUE self, VALUE rb_id)
+{
+    VALUE rb_range;
+    grn_obj *table, *range;
+    grn_ctx *context = NULL;
+    grn_id *sub_records_buffer;
+    unsigned int i, n_sub_records, max_n_sub_records;
+
+    rb_grn_table_deconstruct(SELF(self), &table, &context,
+                             NULL, NULL,
+                             NULL, NULL, &range,
+                             NULL);
+    max_n_sub_records = grn_table_max_n_subrecs(context, table);
+    if (max_n_sub_records == 0) {
+        return Qnil;
+    }
+    RETURN_ENUMERATOR(self, 0, NULL);
+    sub_records_buffer = ALLOCA_N(grn_id, max_n_sub_records);
+    n_sub_records = grn_table_get_subrecs(context, table, NUM2UINT(rb_id),
+                                          sub_records_buffer, NULL,
+                                          (int)max_n_sub_records);
+    rb_range = GRNOBJECT2RVAL(Qnil, context, range, GRN_FALSE);
+    for (i = 0; i < n_sub_records; i++) {
+        rb_yield(rb_grn_record_new(rb_range, sub_records_buffer[i], Qnil));
+    }
+    return Qnil;
+}
+
 /*
  * _table_ の _id_ に対応する {Groonga::Record} を返す。
  *
@@ -2005,7 +2041,7 @@ rb_grn_table_is_locked (int argc, VALUE *argv, VALUE self)
  *         は何もしない。 =:
  *       - Groonga::Operator::AND :=
  *         マッチしたレコードのスコアを増加。マッチしなかったレコードを削除。 =:
- *       - Groonga::Operator::BUT :=
+ *       - Groonga::Operator::AND_NOT :=
  *         マッチしたレコードを削除。 =:
  *       - Groonga::Operator::ADJUST :=
  *         マッチしたレコードのスコアを増加。 =:
@@ -2120,6 +2156,12 @@ rb_grn_table_select (int argc, VALUE *argv, VALUE self)
                                   GRN_TABLE_HASH_KEY | GRN_OBJ_WITH_SUBREC,
                                   table,
                                   NULL);
+        rb_grn_context_check(context, self);
+        if (!result) {
+            rb_raise(rb_eGrnNoMemoryAvailable,
+                     "failed to create result table: %s",
+                     rb_grn_inspect(rb_ary_new4(argc, argv)));
+        }
         rb_result = GRNTABLE2RVAL(context, result, GRN_TRUE);
     } else {
         result = RVAL2GRNTABLE(rb_result, &context);
@@ -2212,7 +2254,7 @@ rb_grn_table_intersection_bang (VALUE self, VALUE rb_other)
 static VALUE
 rb_grn_table_difference_bang (VALUE self, VALUE rb_other)
 {
-    return rb_grn_table_set_operation_bang(self, rb_other, GRN_OP_BUT);
+    return rb_grn_table_set_operation_bang(self, rb_other, GRN_OP_AND_NOT);
 }
 
 /*
@@ -2251,12 +2293,13 @@ static VALUE
 rb_grn_table_support_sub_records_p (VALUE self)
 {
     grn_obj *table;
+    grn_ctx *context;
 
-    rb_grn_table_deconstruct(SELF(self), &table, NULL,
+    rb_grn_table_deconstruct(SELF(self), &table, &context,
                              NULL, NULL,
                              NULL, NULL, NULL,
                              NULL);
-    return CBOOL2RVAL(GRN_TABLE_IS_GROUPED(table));
+    return CBOOL2RVAL(grn_table_is_grouped(context, table));
 }
 
 /*
@@ -2423,6 +2466,9 @@ rb_grn_init_table (VALUE mGrn)
 
     rb_define_method(rb_cGrnTable, "each", rb_grn_table_each, -1);
 
+    rb_define_method(rb_cGrnTable, "each_sub_record",
+                     rb_grn_table_each_sub_record, 1);
+
     rb_define_method(rb_cGrnTable, "delete", rb_grn_table_delete, -1);
 
     rb_define_method(rb_cGrnTable, "sort", rb_grn_table_sort, -1);