Ruby提问区

taroxd

LZ写一个这样的程序吧：
输入一段Ruby代码和这段代码的input，如果这段代码执行后会死循环，输出 true。如果这段代码能正常停止，输出 false。

RyanBern

楼上的太难了
LZ写一个这样的程序吧：
输入一段Ruby代码，如果这段代码里面的end不多也不少，输出true，否则输出false。

KB.Driver

新难题「版主们的リクエスト」
_(:3」∠)_

Password

楼上的都太难了
来个有实际意义的吧：输入一个具体的数学算式（例如18 / 4 或 (4/3) * 2），先判断结果是否是整数或有限小数，是的话直接输出结果，反之输出为最简分数。

寒冷魔王

楼上的都太难了，顺便围观状元卖萌

好吧，就问一个简单的问题
ruby的Array似乎是不连续的。
每次索引求值（包括each）都会产生额外消耗。
[pre lang="C"]VALUE
rb_ary_each(VALUE array)
{
    long i;
    volatile VALUE ary = array;

    RETURN_SIZED_ENUMERATOR(ary, 0, 0, ary_enum_length);
    for (i=0; i<RARRAY_LEN(ary); i++) {
        rb_yield(RARRAY_AREF(ary, i));
    }
    return ary;
}[/pre]
包括Struct（而且速度还不如Array）
因此才有了Table（RGSS）

于是求助——
怎样在不借助外部的情况下，在Ruby内产生一个连续内存空间的数据结构？
使之可以迅速访问，不产生较多额外消耗？

taroxd

寒冷魔王 发表于 2015-8-6 12:02
楼上的都太难了，顺便围观状元卖萌

好吧，就问一个简单的问题

送你个不管越界不检查参数的无责任数组（比原生Ruby Array慢，我会乱说？）：

[pre lang="C" file="my_array.c"]#include <ruby.h>

struct my_array {
  size_t size;
  VALUE *ptr;
};

static void
my_array_free(void *p) {
  struct my_array *ptr = p;

  if (ptr->size > 0)
    free(ptr->ptr);
}

static VALUE
my_array_alloc(VALUE klass) {
  VALUE obj;
  struct my_array *ptr;

  obj = Data_Make_Struct(klass, struct my_array, NULL, my_array_free, ptr);

  ptr->size = 0;
  ptr->ptr  = NULL;

  return obj;
}

static VALUE
my_array_init(VALUE self, VALUE size) {
  struct my_array *ptr;
  size_t requested = NUM2SIZET(size);

  Data_Get_Struct(self, struct my_array, ptr);

  ptr->ptr = (VALUE *)malloc(requested * sizeof(VALUE));
  ptr->size = requested;

  return self;
}

static VALUE
my_array_size(VALUE self) {
  struct my_array *ptr;

  Data_Get_Struct(self, struct my_array, ptr);

  return SIZET2NUM(ptr->size);
}

static VALUE
my_array_get(VALUE self, VALUE index) {
  struct my_array *ptr;

  Data_Get_Struct(self, struct my_array, ptr);

  return (ptr->ptr)[NUM2LONG(index)];

}

static VALUE
my_array_set(VALUE self, VALUE index, VALUE value) {
  struct my_array *ptr;

  Data_Get_Struct(self, struct my_array, ptr);

  (ptr->ptr)[NUM2LONG(index)] = value;
  return value;
}

#ifdef __cplusplus
extern "C" {
#endif
__declspec(dllexport)
void
Init_my_array(void) {
  VALUE cMyArray;

  cMyArray = rb_const_get(rb_cObject, rb_intern("MyArray"));

  rb_define_alloc_func(cMyArray, my_array_alloc);
  rb_define_method(cMyArray, "initialize", my_array_init, 1);
  rb_define_method(cMyArray, "size", my_array_size, 0);
  rb_define_method(cMyArray, "[]", my_array_get, 1);
  rb_define_method(cMyArray, "[]=", my_array_set, 2);
}
#ifdef __cplusplus
}
#endif
[/pre]

[pre lang="ruby"]class MyArray; end

require_relative 'my_array'

a = MyArray.new(2)
a[0] = 1
p a[0][/pre]

chd114

taroxd 发表于 2015-8-6 01:57
送你个不管越界不检查参数的无责任数组：

#include

水的好，楼主选择死亡（楼主已经死亡）