diff options
Diffstat (limited to 'ext/-test-/fatal/invalid.c')
| -rw-r--r-- | ext/-test-/fatal/invalid.c | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/ext/-test-/fatal/invalid.c b/ext/-test-/fatal/invalid.c new file mode 100644 index 0000000000..6fd970b181 --- /dev/null +++ b/ext/-test-/fatal/invalid.c @@ -0,0 +1,22 @@ +#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); +} |
