mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
106 lines
2.7 KiB
Text
106 lines
2.7 KiB
Text
|
%# -*- mode:c; style:ruby; coding: utf-8; indent-tabs-mode: nil -*-
|
||
|
|
%# Copyright (c) 2018 Urabe, Shyouhei. All rights reserved.
|
||
|
|
%#
|
||
|
|
%# This file is a part of the programming language Ruby. Permission is hereby
|
||
|
|
%# granted, to either redistribute and/or modify this file, provided that the
|
||
|
|
%# conditions mentioned in the file COPYING are met. Consult the file for
|
||
|
|
%# details.
|
||
|
|
%;
|
||
|
|
|
||
|
|
static bool
|
||
|
|
leafness_of_getglobal(VALUE gentry)
|
||
|
|
{
|
||
|
|
const struct rb_global_entry *e = (void *)gentry;
|
||
|
|
|
||
|
|
if (UNLIKELY(rb_gvar_is_traced(e))) {
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
/* We cannot write this function using a switch() because a
|
||
|
|
* case label cannot be a function pointer. */
|
||
|
|
static rb_gvar_getter_t *const whitelist[] = {
|
||
|
|
rb_gvar_val_getter,
|
||
|
|
rb_gvar_var_getter,
|
||
|
|
rb_gvar_undef_getter,
|
||
|
|
};
|
||
|
|
rb_gvar_getter_t *f = rb_gvar_getter_function_of(e);
|
||
|
|
int i;
|
||
|
|
|
||
|
|
for (i = 0; i < numberof(whitelist); i++) {
|
||
|
|
if (f == whitelist[i]) {
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
static bool
|
||
|
|
leafness_of_setglobal(VALUE gentry)
|
||
|
|
{
|
||
|
|
const struct rb_global_entry *e = (void *)gentry;
|
||
|
|
|
||
|
|
if (UNLIKELY(rb_gvar_is_traced(e))) {
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
/* We cannot write this function using a switch() because a
|
||
|
|
* case label cannot be a function pointer. */
|
||
|
|
static rb_gvar_setter_t *const whitelist[] = {
|
||
|
|
rb_gvar_val_setter,
|
||
|
|
rb_gvar_readonly_setter,
|
||
|
|
rb_gvar_var_setter,
|
||
|
|
rb_gvar_undef_setter,
|
||
|
|
};
|
||
|
|
rb_gvar_setter_t *f = rb_gvar_setter_function_of(e);
|
||
|
|
int i;
|
||
|
|
|
||
|
|
for (i = 0; i < numberof(whitelist); i++) {
|
||
|
|
if (f == whitelist[i]) {
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
#include "iseq.h"
|
||
|
|
|
||
|
|
static bool
|
||
|
|
leafness_of_defined(rb_num_t op_type)
|
||
|
|
{
|
||
|
|
/* see also: vm_insnhelper.c:vm_defined() */
|
||
|
|
switch (op_type) {
|
||
|
|
case DEFINED_IVAR:
|
||
|
|
case DEFINED_IVAR2:
|
||
|
|
case DEFINED_GVAR:
|
||
|
|
case DEFINED_CVAR:
|
||
|
|
case DEFINED_YIELD:
|
||
|
|
case DEFINED_REF:
|
||
|
|
case DEFINED_ZSUPER:
|
||
|
|
return false;
|
||
|
|
case DEFINED_CONST:
|
||
|
|
/* has rb_autoload_load(); */
|
||
|
|
return false;
|
||
|
|
case DEFINED_FUNC:
|
||
|
|
case DEFINED_METHOD:
|
||
|
|
/* calls #respond_to_missing? */
|
||
|
|
return false;
|
||
|
|
default:
|
||
|
|
rb_bug("unknown operand %ld: blame @shyouhei.", op_type);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
static bool
|
||
|
|
leafness_of_checkmatch(rb_num_t flag)
|
||
|
|
{
|
||
|
|
/* see also: vm_insnhelper.c:check_match() */
|
||
|
|
if (flag == VM_CHECKMATCH_TYPE_WHEN) {
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
/* has rb_funcallv() */
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|