From 4dedfc3cc97c2470f1926eaef49e381839e157ef Mon Sep 17 00:00:00 2001 From: naruse Date: Tue, 10 Nov 2015 17:50:38 +0000 Subject: Add tests for rb_time_timespec_new git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@52527 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/-test-/time/extconf.rb | 7 +++++++ ext/-test-/time/init.c | 11 +++++++++++ ext/-test-/time/new.c | 34 ++++++++++++++++++++++++++++++++++ 3 files changed, 52 insertions(+) create mode 100644 ext/-test-/time/extconf.rb create mode 100644 ext/-test-/time/init.c create mode 100644 ext/-test-/time/new.c (limited to 'ext/-test-') diff --git a/ext/-test-/time/extconf.rb b/ext/-test-/time/extconf.rb new file mode 100644 index 0000000000..b9741992d1 --- /dev/null +++ b/ext/-test-/time/extconf.rb @@ -0,0 +1,7 @@ +$INCFLAGS << " -I$(topdir) -I$(top_srcdir)" +$srcs = Dir[File.join($srcdir, "*.{#{SRC_EXT.join(%q{,})}}")] +inits = $srcs.map {|s| File.basename(s, ".*")} +inits.delete("init") +inits.map! {|s|"X(#{s})"} +$defs << "-DTEST_INIT_FUNCS(X)=\"#{inits.join(' ')}\"" +create_makefile("-test-/time") diff --git a/ext/-test-/time/init.c b/ext/-test-/time/init.c new file mode 100644 index 0000000000..01a20b8b3d --- /dev/null +++ b/ext/-test-/time/init.c @@ -0,0 +1,11 @@ +#include "ruby.h" + +#define init(n) {void Init_##n(VALUE klass); Init_##n(klass);} + +void +Init_time(void) +{ + VALUE mBug = rb_define_module("Bug"); + VALUE klass = rb_define_class_under(mBug, "Time", rb_cTime); + TEST_INIT_FUNCS(init); +} diff --git a/ext/-test-/time/new.c b/ext/-test-/time/new.c new file mode 100644 index 0000000000..0f71a5542b --- /dev/null +++ b/ext/-test-/time/new.c @@ -0,0 +1,34 @@ +#include "ruby.h" + +static VALUE +bug_time_s_nano_new(VALUE klass, VALUE sec, VALUE nsec) +{ + return rb_time_nano_new(NUM2TIMET(sec), NUM2LONG(nsec)); +} + +static VALUE +bug_time_s_timespec_new(VALUE klass, VALUE sec, VALUE nsec, VALUE gmtoff) +{ + struct timespec ts; + ts.tv_sec = NUM2TIMET(sec); + ts.tv_nsec = NUM2LONG(nsec); + return rb_time_timespec_new(&ts, NUM2INT(gmtoff)); +} + +static VALUE +bug_time_s_timespec_now(VALUE klass) +{ + struct timespec ts; + VALUE v; + rb_timespec_now(&ts); + v = rb_Rational(LONG2NUM(ts.tv_nsec), LONG2NUM(1000000000L)); + return rb_num_coerce_bin(TIMET2NUM(ts.tv_sec), v, '+'); +} + +void +Init_new(VALUE klass) +{ + rb_define_singleton_method(klass, "nano_new", bug_time_s_nano_new, 2); + rb_define_singleton_method(klass, "timespec_new", bug_time_s_timespec_new, 3); + rb_define_singleton_method(klass, "timespec_now", bug_time_s_timespec_now, 0); +} -- cgit v1.2.3