tree-sitter 0.0.1 → 0.1.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 57d7addbd40748395a30b1f7f233a0c62ca89025
-  data.tar.gz: c4b80d2f39e0b893635d1b0119c39ff12f83fabf
+  metadata.gz: 7fcb8d627f16438984aa6492baad64139cf0f224
+  data.tar.gz: ee2e341ee8c4cd762986543b9976d0203698e3af
 SHA512:
-  metadata.gz: 530d48bd58fd71ffb82b4a6ed04f0e01916372e76065050c21cca4eea47807f7adc563e77617c6dc5c490f038b373d428bb536ff4a21017cf3d0e4a4c848d3bc
-  data.tar.gz: 043f4ebb6cdb1a95dcb1f69ffc531836e32a12a6c2c473c16452618756b60b5ed09e8a77751c676ff423ce669e9fbf483e7b898ec38c51ab44823eb8b2ab3ebe
+  metadata.gz: b324ea9d78511ade844bf7da2b5835082d5e2628c5735be09c29eb6d2b39b6b1131db0177ea1085393bd78921d73578dc72373aac87df2cca7fa2d34465589d9
+  data.tar.gz: 9013d6548e6852ca729babafa71471dfec3e4b823076e3c93422e851d06dabec3a34fd1669abe71e8d01794c5099649eb6ef0d63a91cd58d51e31b9748aed7b1

data/README.md

@@ -20,17 +20,38 @@ Or install it yourself as:
 
 ## Usage
 
-``` ruby
-require 'tree-sitter'
+Tree-sitter performs [two different operations](https://github.com/tree-sitter/tree-sitter#overview): compiling grammars and parsing text with those grammars.
+
+This gem is only concerned with parsing a blob of text, given the appropriate grammars. Compiling grammars from JSON is trivial and can just be kept as an executable generated from C.
+
+### Running the parser
+
+The libruntime static library needs to make use of the C code generated by the libcompile executable. Once you've got those, you'll need to provide an absolute path to the directory containing the C files that the library can incorporate. For example:
 
-# compile a grammar
-ruby_grammar = File.read("ruby/grammar.json")
-TreeSitter.compile(ruby_grammar)
+``` bash
+# if you've installed this gem
+$ TREE_SITTER_PARSER_DIR=/somewhere/code bundle install
+# if you're using this gem locally
+$ TREE_SITTER_PARSER_DIR=/somewhere/code bundle exec rake compile
+```
+
+This directory is appended with the glob suffix `**/*.{c,cc}`, so it can contain as many nested parser files as necessary.
 
-# make a document
-doc = TreeSitter::Document.new
+Then, you can start making use of the parser:
 
+``` ruby
+# first argument is the string to parse
+# second argument is a set of options; currently, only one is available, `language:`,
+# which identifies the text's language
+document = TreeSitter::Document.new('a + b * 5', language: 'tree_sitter_arithmetic')
+
+# you can change any of these values whenever you want, just remember to call `parse`
+# provide the function name
+document.input_string = '12 * 12'
+document.language = "tree_sitter_python"
+document.parse
 ```
+
 ## Development
 
-After checking out the repo, run `script/bootstrap` to install dependencies. Then, run `bundle exec rake test` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+After checking out the repo, run `script/bootstrap` to install dependencies. Then, run `script/test` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.

data/Rakefile

@@ -1,3 +1,5 @@
+# frozen_string_literal: true
+
 require 'rake/extensiontask'
 require 'bundler/gem_tasks'
 
@@ -10,10 +12,12 @@ Rake::ExtensionTask.new('tree-sitter', gem_spec) do |ext|
   ext.lib_dir = File.join('lib', 'tree-sitter')
 end
 
-Rake::Task['clean'].enhance do
-  ext_dir = File.join(File.dirname(__FILE__), 'ext', 'tree-sitter', 'tree-sitter')
+desc 'Wipe project (including tree-sitter files)'
+task :clean_hard do
+  Rake::Task['clean'].invoke
+  ext_dir = File.join(File.dirname(__FILE__), 'ext', 'tree-sitter')
   Dir.chdir(ext_dir) do
-    `make clean`
+    FileUtils.rm_rf('out')
   end
 end
 
@@ -33,6 +37,10 @@ task 'test:unit' => :compile
 desc 'Run unit and conformance tests'
 task test: %w(test:unit)
 
+require 'rubocop/rake_task'
+
+RuboCop::RakeTask.new(:rubocop)
+
 task :console do
   require 'pry'
   require 'tree-sitter'
@@ -46,4 +54,11 @@ task :console do
   Pry.start
 end
 
-task default: [:compile, :test]
+desc 'Pretty format code'
+task :format do
+  puts `astyle -n --indent=spaces=2 --style=1tbs --keep-one-line-blocks \
+        $(ack -n -f --type=cc ext/tree-sitter/)`
+  puts `bundle exec rubocop -a`
+end
+
+task default: [:test]

data/ext/tree-sitter/Makefile

@@ -0,0 +1,24 @@
+SRCDIR = tree-sitter/src
+EXTERNALSDIR = tree-sitter/externals
+OUTDIR = out
+SOURCE_FILES = $(wildcard $(SRCDIR)/runtime/*.c) $(wildcard $(EXTERNALSDIR)/utf8proc/utf8proc.c)
+OUTFILES = $(wildcard $(OUTDIR)/*.o)
+STATIC=libruntime.a
+
+CFLAGS = -fPIC -std=c99 -Wall -O2
+INC = -I$(SRCDIR) -I$(SRCDIR)/../include  -I$(EXTERNALSDIR)/utf8proc
+
+OBJECT_FILES = $(SOURCE_FILES:%.c= %.o)
+
+$(OBJECT_FILES): %.o: %.c
+	$(CC) -c $(INC) -o $(OUTDIR)/$(notdir $@) $< $(CFLAGS)
+
+$(STATIC):
+	@echo "[Link (Static)]"
+	@ar rcs $(OUTDIR)/$(STATIC) $(OUTFILES)
+
+runtime: $(OBJECT_FILES) $(STATIC)
+
+.PHONY: clean
+clean:
+	rm -f $(OUTDIR)/*.o $(OUTDIR)/*.a

data/ext/tree-sitter/document.c

@@ -0,0 +1,149 @@
+#include "document.h"
+
+VALUE rb_cDocument;
+
+/*
+ * Internal: Allocate a new document
+ *
+ */
+static VALUE rb_document_alloc(VALUE self)
+{
+  TSDocument *document = ts_document_new();
+
+  if (document == NULL) {
+    rb_raise(rb_eDocumentError, "Could not create document!");
+  }
+
+  return Data_Wrap_Struct(self, NULL, ts_document_free, document);
+}
+
+/*
+ * Public: Creates a new document
+ *
+ */
+VALUE rb_document_new(VALUE self, VALUE rb_input_string, VALUE rb_options)
+{
+  TSDocument *document;
+  VALUE rb_language;
+
+  Check_Type(rb_input_string, T_STRING);
+  Check_Type (rb_options, T_HASH);
+
+  rb_language = rb_hash_aref(rb_options, CSTR2SYM("language"));
+  Check_Type(rb_language, T_STRING);
+
+  Data_Get_Struct(self, TSDocument, document);
+
+  rb_document_set_language(self, rb_language);
+  rb_document_set_input_string(self, rb_input_string);
+  rb_document_parse(self);
+
+  return self;
+}
+
+
+/*
+ * Public: Set the language type of a document.
+ *
+ * lang - A {String} identifying the language.
+ *
+ * Returns nothing.
+ */
+VALUE rb_document_set_language(VALUE self, VALUE lang)
+{
+  TSDocument *document;
+  char *language_name;
+  void *handle;
+  char *error;
+  Check_Type(lang, T_STRING);
+
+  language_name = StringValueCStr(lang);
+
+  const TSLanguage * (*language_func)();
+
+  handle = dlopen(BUNDLE_PATH, RTLD_LAZY);
+  if (!handle) {
+    rb_raise(rb_eDocumentError, "%s", dlerror());
+  }
+
+  dlerror();    /* Clear any existing error */
+
+  *(void **) (&language_func) = dlsym(handle, language_name);
+
+  if ((error = dlerror()) != NULL)  {
+    rb_raise(rb_eDocumentError, "%s", error);
+  }
+
+  Data_Get_Struct(self, TSDocument, document);
+
+  ts_document_set_language(document, (*language_func)());
+  dlclose(handle);
+
+  return Qnil;
+}
+
+/*
+ * Public: Set the document string.
+ *
+ * string - A {String} identifying the document contents.
+ *
+ * Returns nothing.
+ */
+VALUE rb_document_set_input_string(VALUE self, VALUE rb_input_string)
+{
+  TSDocument *document;
+  Check_Type(rb_input_string, T_STRING);
+  char *c_string = StringValueCStr(rb_input_string);
+
+  Data_Get_Struct(self, TSDocument, document);
+
+  ts_document_set_input_string(document, c_string);
+
+  return Qnil;
+}
+
+/*
+ * Public: Parses the document string.
+ *
+ * Returns true if successful.
+ */
+VALUE rb_document_parse(VALUE self)
+{
+  TSDocument *document;
+
+  Data_Get_Struct(self, TSDocument, document);
+
+  ts_document_parse(document);
+
+  return Qtrue;
+}
+
+/*
+ * Public: Returns the document root node.
+ *
+ * Returns a {Node}.
+ */
+VALUE rb_document_root_node(VALUE self)
+{
+  TSDocument *document;
+
+  Data_Get_Struct(self, TSDocument, document);
+  TSNode ts_node = ts_document_root_node(document);
+
+  return rb_new_node(ts_node, document);
+}
+
+void init_document()
+{
+  VALUE tree_sitter = rb_define_module("TreeSitter");
+
+  rb_eDocumentError = rb_define_class_under(tree_sitter, "DocumentError", rb_eStandardError);
+
+  VALUE rb_cDocument = rb_define_class_under(tree_sitter, "Document", rb_cObject);
+  rb_define_alloc_func(rb_cDocument, rb_document_alloc);
+  rb_define_method(rb_cDocument, "initialize", rb_document_new, 2);
+  rb_define_method(rb_cDocument, "language=", rb_document_set_language, 1);
+  rb_define_method(rb_cDocument, "input_string=", rb_document_set_input_string, 1);
+  rb_define_method(rb_cDocument, "parse", rb_document_parse, 0);
+  rb_define_method(rb_cDocument, "root_node", rb_document_root_node, 0);
+}

data/ext/tree-sitter/document.h

@@ -0,0 +1,17 @@
+#ifndef RB_TREE_SITTER_DOCUMENT_H
+#define RB_TREE_SITTER_DOCUMENT_H
+
+#include "ruby.h"
+#include <dlfcn.h>
+#include "tree-sitter.h"
+
+static VALUE rb_eDocumentError;
+
+void init_document();
+static VALUE rb_document_alloc(VALUE self);
+VALUE rb_document_new(VALUE self, VALUE rb_str, VALUE rb_options);
+VALUE rb_document_set_language(VALUE self, VALUE lang);
+VALUE rb_document_set_input_string(VALUE self, VALUE str);
+VALUE rb_document_parse(VALUE self);
+
+#endif

data/ext/tree-sitter/extconf.rb

@@ -1,34 +1,74 @@
+# frozen_string_literal: true
+
 require 'mkmf'
 require 'fileutils'
 require 'rbconfig'
 
-HOST_OS = RbConfig::CONFIG['host_os']
+if ENV['TREE_SITTER_PARSER_DIR'].nil?
+  abort 'You need to set the `TREE_SITTER_PARSER_DIR` environment variable! See the README for more information.'
+end
+
+unless Dir.exist?(ENV['TREE_SITTER_PARSER_DIR'])
+  abort "The `TREE_SITTER_PARSER_DIR` environment variable does not point to a real directory: `#{ENV['TREE_SITTER_PARSER_DIR']}`! See the README for more information."
+end
+
 SITEARCH = RbConfig::CONFIG['sitearch']
 LIBDIR      = RbConfig::CONFIG['libdir']
 INCLUDEDIR  = RbConfig::CONFIG['includedir']
+DLEXT = RbConfig::CONFIG['DLEXT']
+
+ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..', '..'))
+THIS_DIR = File.dirname(__FILE__)
+OUT_DIR = File.join(THIS_DIR, 'out')
 
-ROOT_TMP = File.expand_path(File.join(File.dirname(__FILE__), '..', '..', 'tmp'))
 TREE_SITTER_DIR = File.expand_path(File.join(File.dirname(__FILE__), 'tree-sitter'))
-TREE_SITTER_SRC_DIR = File.join(TREE_SITTER_DIR, 'src')
 TREE_SITTER_INCLUDE_DIR = File.join(TREE_SITTER_DIR, 'include')
-TREE_SITTER_OUTPUT_DIR = File.join(TREE_SITTER_DIR, 'out', 'Release')
+TREE_SITTER_SRC_DIR = File.join(TREE_SITTER_DIR, 'src')
 
-Dir.chdir(TREE_SITTER_DIR) do
-  system 'script/configure'
-  system 'make' or abort 'make failed'
-end
+BUNDLE_PATH = File.join(ROOT, 'lib', 'tree-sitter', "treesitter.#{DLEXT}")
 
-HEADER_DIRS = [INCLUDEDIR, TREE_SITTER_SRC_DIR, TREE_SITTER_INCLUDE_DIR]
-LIB_DIRS = [LIBDIR, TREE_SITTER_OUTPUT_DIR]
+HEADER_DIRS = [INCLUDEDIR, TREE_SITTER_INCLUDE_DIR]
+LIB_DIRS = [LIBDIR, OUT_DIR]
 
 dir_config('treesitter', HEADER_DIRS, LIB_DIRS)
 
-# don't even bother to do this check if using OS X's messed up system Ruby: http://git.io/vsxkn
-unless SITEARCH =~ /^universal-darwin/
-  abort 'libruntime is missing.' unless find_library('runtime', 'ts_document_new')
+FileUtils.mkdir_p(OUT_DIR)
+
+Dir.chdir(THIS_DIR) do
+  system 'make runtime'
 end
 
-$LDFLAGS << " -L#{TREE_SITTER_OUTPUT_DIR} -lcompiler -lruntime"
-$CFLAGS << " -O2 -I#{TREE_SITTER_INCLUDE_DIR} -I#{TREE_SITTER_SRC_DIR}"
+c_files = Dir.glob("#{ENV['TREE_SITTER_PARSER_DIR']}/**/*.{c,cc}")
+c_files.each do |c_file|
+  parent_dir = c_file.split(File::SEPARATOR)[-2]
+  dir = File.join(OUT_DIR, parent_dir)
+  FileUtils.mkdir_p(dir)
+  FileUtils.cp(c_file, dir)
+end
+
+c_files = c_files.join(' ')
+o_files = c_files.gsub(%r{(?:\S+)#{File::SEPARATOR}(\S+)#{File::SEPARATOR}(\w+)\.(?:c|cc)(\s|$)}, File.join(OUT_DIR, '\\1', '\\2.o\\3'))
+
+flag = ENV['TRAVIS'] ? '-O0' : '-O2'
+
+$LDFLAGS << " -I#{TREE_SITTER_INCLUDE_DIR} -lruntime -lstdc++"
+$CFLAGS << " #{flag} -fPIC -std=c99 -I#{TREE_SITTER_SRC_DIR} -DBUNDLE_PATH='\"#{BUNDLE_PATH}\"'"
 
 create_makefile('tree-sitter/treesitter')
+
+makefile = File.read 'Makefile'
+
+# tack on parser files as part of compilation
+lines = makefile.lines.map do |line|
+  if line.start_with?('ORIG_SRCS =')
+    line.sub /$/, " #{c_files}"
+  elsif line.start_with?('OBJS =')
+    line.sub /$/, " #{o_files}"
+  else
+    line
+  end
+end
+
+File.open 'Makefile', 'w' do |f|
+  f.puts lines
+end

data/ext/tree-sitter/node.c

@@ -0,0 +1,300 @@
+#include "node.h"
+
+VALUE rb_cNode;
+VALUE rb_cPoint;
+
+static void rb_node_free(void *n)
+{
+  free(n);
+}
+
+VALUE rb_new_node(TSNode ts_node, TSDocument *ts_document)
+{
+  AstNode *node = malloc(sizeof(AstNode));
+  node->ts_node = ts_node;
+  node->ts_document = ts_document;
+  return Data_Wrap_Struct(rb_cNode, NULL, rb_node_free, node);
+}
+
+/*
+ * Public: Render the node and its children as a string.
+ *
+ * Returns a {String}.
+ */
+VALUE rb_node_to_s(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  return rb_str_new_cstr(ts_node_string(node->ts_node, node->ts_document));
+}
+
+/*
+ * Public: The node type.
+ *
+ * Returns a {String}.
+ */
+VALUE rb_node_type(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  return rb_str_new_cstr(ts_node_type(node->ts_node, node->ts_document));
+}
+
+void rb_point_free(void *p)
+{
+  free(p);
+}
+
+/*
+ * Public: Get the starting position for a node.
+ *
+ * Returns a {Point}.
+ */
+VALUE rb_node_start_point(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  TSPoint start = ts_node_start_point(node->ts_node);
+  Point *point = malloc(sizeof(Point));
+  point->ts_point = start;
+
+  return Data_Wrap_Struct(rb_cPoint, NULL, rb_point_free, point);
+}
+
+/*
+ * Public: Get the ending position for a node.
+ *
+ * Returns a {Point}.
+ */
+VALUE rb_node_end_point(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  TSPoint start = ts_node_end_point(node->ts_node);
+
+  Point *point = malloc(sizeof(Point));
+  point->ts_point = start;
+
+  return Data_Wrap_Struct(rb_cPoint, NULL, rb_point_free, point);
+}
+
+/*
+ * Public: Does the node have a name?
+ *
+ * Returns a {Boolean}.
+ */
+VALUE rb_node_is_named(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  return ts_node_is_named(node->ts_node) ? Qtrue : Qfalse;
+}
+
+/*
+ * Public: The number of named and unnamed children.
+ *
+ * Returns an {Integer}.
+ */
+VALUE rb_node_child_count(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  if (node->ts_node.data) {
+    return UINT2NUM(ts_node_child_count(node->ts_node));
+  } else {
+    return UINT2NUM(0);
+  }
+}
+
+/*
+ * Public: The number of named children.
+ *
+ * Returns an {Integer}.
+ */
+VALUE rb_node_named_child_count(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  if (node->ts_node.data) {
+    return UINT2NUM(ts_node_named_child_count(node->ts_node));
+  } else {
+    return UINT2NUM(0);
+  }
+}
+
+/*
+ * Public: Return the first child.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_first_child(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  TSNode child = ts_node_child(node->ts_node, 0);
+
+  if (child.data) {
+    return rb_new_node(child, node->ts_document);
+  } else {
+    return Qnil;
+  }
+}
+
+/*
+ * Public: Return the first named child.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_first_named_child(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  TSNode child = ts_node_named_child(node->ts_node, 0);
+
+  if (child.data) {
+    return rb_new_node(child, node->ts_document);
+  } else {
+    return Qnil;
+  }
+}
+
+/*
+ * Public: Return the last child.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_last_child(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  uint32_t child_count = ts_node_child_count(node->ts_node);
+  if (child_count > 0) {
+    TSNode child = ts_node_child(node->ts_node, child_count - 1);
+    return rb_new_node(child, node->ts_document);
+  } else {
+    return Qnil;
+  }
+}
+
+/*
+ * Public: Return the last named child.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_last_named_child(VALUE self)
+{
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  uint32_t child_count = ts_node_named_child_count(node->ts_node);
+  if (child_count > 0) {
+    TSNode child = ts_node_named_child(node->ts_node, child_count - 1);
+    return rb_new_node(child, node->ts_document);
+  } else {
+    return Qnil;
+  }
+}
+
+/*
+ * Public: Return the child at the specified index.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_child(VALUE self, VALUE child_index)
+{
+  Check_Type(child_index, T_FIXNUM);
+  uint32_t i = NUM2UINT(child_index);
+
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  uint32_t child_count = ts_node_child_count(node->ts_node);
+
+  if (i > child_count) {
+    return Qnil;
+  } else {
+    TSNode child = ts_node_child(node->ts_node, i);
+    return rb_new_node(child, node->ts_document);
+  }
+}
+
+/*
+ * Public: Return the named child at the specified index.
+ *
+ * Returns a {Node} or nil.
+ */
+VALUE rb_node_named_child(VALUE self, VALUE child_index)
+{
+  Check_Type(child_index, T_FIXNUM);
+  uint32_t i = NUM2UINT(child_index);
+
+  AstNode *node;
+  Data_Get_Struct(self, AstNode, node);
+
+  uint32_t child_count = ts_node_named_child_count(node->ts_node);
+
+  if (i > child_count) {
+    return Qnil;
+  } else {
+    TSNode child = ts_node_named_child(node->ts_node, i);
+    return rb_new_node(child, node->ts_document);
+  }
+}
+
+/*
+ * Public: Return the row for a point.
+ *
+ * Returns an {Integer}.
+ */
+VALUE rb_point_row(VALUE self)
+{
+  Point *point;
+  Data_Get_Struct(self, Point, point);
+  return UINT2NUM(point->ts_point.row);
+}
+
+/*
+ * Public: Return the column for a point.
+ *
+ * Returns an {Integer}.
+ */
+VALUE rb_point_column(VALUE self)
+{
+  Point *point;
+  Data_Get_Struct(self, Point, point);
+  return UINT2NUM(point->ts_point.column);
+}
+
+void init_node()
+{
+  VALUE tree_sitter = rb_define_module("TreeSitter");
+
+  rb_cNode = rb_define_class_under(tree_sitter, "Node", rb_cObject);
+  rb_define_method(rb_cNode, "to_s", rb_node_to_s, 0);
+  rb_define_method(rb_cNode, "node_type", rb_node_type, 0);
+  rb_define_method(rb_cNode, "named?", rb_node_is_named, 0);
+  rb_define_method(rb_cNode, "child_count", rb_node_child_count, 0);
+  rb_define_method(rb_cNode, "named_child_count", rb_node_named_child_count, 0);
+  rb_define_method(rb_cNode, "first_child", rb_node_first_child, 0);
+  rb_define_method(rb_cNode, "first_named_child", rb_node_first_named_child, 0);
+  rb_define_method(rb_cNode, "last_child", rb_node_last_named_child, 0);
+  rb_define_method(rb_cNode, "last_named_child", rb_node_last_named_child, 0);
+  rb_define_method(rb_cNode, "child", rb_node_child, 1);
+  rb_define_method(rb_cNode, "named_child", rb_node_named_child, 1);
+  rb_define_method(rb_cNode, "start_position", rb_node_start_point, 0);
+  rb_define_method(rb_cNode, "end_position", rb_node_end_point, 0);
+
+  rb_cPoint = rb_define_class_under(rb_cNode, "Point", rb_cObject);
+  rb_define_method(rb_cPoint, "row", rb_point_row, 0);
+  rb_define_method(rb_cPoint, "column", rb_point_column, 0);
+}