nobu	2016-12-24 21:19:23 +0900 (Sat, 24 Dec 2016)

  New Revision: 57171

  https://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=revision&revision=57171

  Log:
    time.c: remove debug code

  Modified files:
    trunk/time.c
Index: time.c
===================================================================
--- time.c	(revision 57170)
+++ time.c	(revision 57171)
@@ -53,41 +53,6 @@ eq(VALUE x, VALUE y) https://github.com/ruby/ruby/blob/trunk/time.c#L53
     return RTEST(rb_funcall(x, id_eq, 1, y));
 }
 
-#ifdef _MSC_VER
-static void *
-value_insane_p(VALUE x)
-{
-    VALUE klass;
-    LPEXCEPTION_POINTERS info;
-    void *failed_address = 0;
-    if (SPECIAL_CONST_P(x)) return 0;
-    if (!&RBASIC_CLASS(x)) return (void *)x;
-    __try {
-	RB_GC_GUARD(klass) = RBASIC_CLASS(x);
-    }
-    __except (GetExceptionCode() == EXCEPTION_ACCESS_VIOLATION ?
-	      (info = GetExceptionInformation(), EXCEPTION_EXECUTE_HANDLER) :
-	      EXCEPTION_CONTINUE_SEARCH) {
-	PEXCEPTION_RECORD rec = info->ExceptionRecord;
-	failed_address = (void *)rec->ExceptionInformation[1];
-    }
-    return failed_address;
-}
-
-static void
-inquire_value(VALUE x, const char *mesg)
-{
-    void *failed_address = value_insane_p(x);
-    if (failed_address) {
-	rb_fatal("Access violation at %p: class of %p: %s",
-		 failed_address, (void *)x, mesg);
-    }
-}
-#else
-# define value_insane_p(x) ((void)(x), 0)
-# define inquire_value(x, mesg) (void)value_insane_p(x)
-#endif
-
 static int
 cmp(VALUE x, VALUE y)
 {
@@ -98,8 +63,6 @@ cmp(VALUE x, VALUE y) https://github.com/ruby/ruby/blob/trunk/time.c#L63
             return 1;
         return 0;
     }
-    inquire_value(x, "cmp(x)");
-    inquire_value(y, "cmp(y)");
     return rb_cmpint(rb_funcall(x, id_cmp, 1, y), x, y);
 }
 
@@ -2618,12 +2581,6 @@ time_arg(int argc, VALUE *argv, struct v https://github.com/ruby/ruby/blob/trunk/time.c#L2581
         vtm->sec  = NIL_P(v[5])?0:obj2subsecx(v[5], &vtm->subsecx);
     }
 
-    if (value_insane_p(vtm->subsecx)) {
-	rb_fatal("argc=%d, sec=%"PRIsVALUE", subsec=%"PRIsVALUE", subsecx=%p",
-		 argc, v[5], argc == 7 ? v[6] : Qnil,
-		 &RBASIC_CLASS(vtm->subsecx));
-    }
-
     validate_vtm(vtm);
     RB_GC_GUARD(vtm->subsecx);
 }

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/