mirror of
https://github.com/ruby/ruby.git
synced 2026-01-27 12:34:21 +00:00
23 lines
466 B
C
23 lines
466 B
C
#include <ruby.h>
|
|
|
|
static VALUE
|
|
invalid_call(VALUE obj, VALUE address)
|
|
{
|
|
typedef VALUE (*func_type)(VALUE);
|
|
|
|
return (*(func_type)NUM2PTR(address))(obj);
|
|
}
|
|
|
|
static VALUE
|
|
invalid_access(VALUE obj, VALUE address)
|
|
{
|
|
return *(VALUE *)NUM2PTR(address) == obj ? Qtrue : Qfalse;
|
|
}
|
|
|
|
void
|
|
Init_invalid(VALUE mBug)
|
|
{
|
|
rb_define_singleton_method(mBug, "invalid_call", invalid_call, 1);
|
|
rb_define_singleton_method(mBug, "invalid_access", invalid_access, 1);
|
|
}
|