Вопрос к скриптерам: alias и локальные переменные

alias old_foo foo def foo old_foo for i in bar dosomething(i) end end

def old a = "a" end alias new old def old(*args, &block) new(*args, &block) a = "b" end

def bar @bar end def bar=(arg) @bar=arg end

class Testing def hit @hit end def hit=(value) p value @hit=value end def initialize hit = [] p @hit end end

#Наш класс class Foo #Старая функция. Неприступная как шут знает что. def bar value = 5 end #Алиасим и переопределяем alias bar1 bar def bar #Вызываем старую функцию. Трейсер ниже ловит ее и выхватывает биндинг bar1 #В биндинге недавно вызванной функции делаем новое вычисление, а именно спрашиваем локальную переменную value = $bind.eval("value") #Ваш код #... #Возврат для проверки value end end #Трейсер. Выхватывает вообще все действия в Руби, включая вызов функции set_trace_func proc { |event, file, lineno, id, binding, klass| #События вызова функции. Второе условие важно, вместо Foo впихните свой класс. if (event == "call") and (klass <= Foo) then #Складируем биндинг для будующего использования. Например в $bind $bind = binding end } #Пускаем тест foo = Foo.new p foo.bar

def say a = 1 end alias original_say say def say aliased_binding = nil #заводим переменную, чтобы иметь к ней доступ из трейсера tracer = proc do |event, file, lineno, id, binding, klass| aliased_binding = binding if event == 'return' #записываем в заведенную переменную binding после исполнения оригинальной функции end set_trace_func tracer #устанавливаем трейсер original_say set_trace_func nil #обнуляем трейсер, незачем ему вечно тормозить наш код aliased_binding.eval 'a' end say