Все методы и операторы имеют локальную переменную caller, которая хранит «контекст вызова» метода или оператора.
Через нее можно:
·
узнать, кто вызвал вызвавший описываемый метод или оператор, обратившись к $caller.self;
·
считать - $caller.считать, или записать - $caller.записать[значение] переменную, как будто вы находитесь в том месте, откуда вызвали описываемый метод или оператор.
Например вам нужен оператор, похожий на системный for, но чем-то отличающийся от него. Вы можете написать его сами, воспользовавшись возможностью менять локальную переменную с именем, переданным вам, в контексте вызова вашего оператора. @steppedfor[name;from;to;step;code]
$caller.$name($from)
^while($caller.$name<=$to){
$code
^caller.$name.inc($step)
}
Теперь такой вызов… @somewhere[][i]
^steppedfor[i](1;10;2){$i }
…напечатает «1 3 5 7 9 », обратите внимание, что изменяется локальная переменная метода somewhere. Примечание: возможность узнать контекст вызова удобна для задания контекста компиляции кода (см. «process. Компиляция и исполнение строки».