Собственно вопрос вот в чем, как можно перекрыть оригинальный кадр исключения в СПФ, чтобы при ошибке в любом месте программы попасть на необходимый обработчик, то есть не так:



а как то так:


чтобы любая ошибка приводила к выполнению вектора err_code

Забыл сказать, нужно, чтобы работало во время интерпретации текста, точнее его частей. Что-то типа:

CatchMoment

...
someting
...

EndMoment

но при этом не удалялся родной кадр исключения ( то есть перезапись поверх последнего кадра исключения исключается ).

Лично я в проблему не въехал.
Чем тебя не устраивает CATCH ?
Под любой ошибкой я понимаю выполнение команды THROW при не 0ом
значении на стеке.
Ну подмени его с помощью REPLACE-WORD

REQUIRE REPLACE-WORD lib\ext\patch.f

но только, если очень хочется.

С CatchMoment someting EndMoment вобще ничего не понял.

проблема в том, чтобы не прерывая поток интерпретации можно было в случае ошибки получать управление на нужный обработчик. При этом не вызывая никаких дополнительных парсеров.
Catch тем и не устраивает, что нужно ему на вход подать слово которое будет исполняться, а мне нужно Ctach для уже исполняющегося слова.

Идея такова:

: CatchMoment
LAMBDA{
INTERPRET
BEGIN REFILL WHILE INTERPET REPEAT
} CATCH DUP IF DUP -2006 = IF DROP EXIT THEN >R err_code R> THEN THROW
;
: EndMoment -2006 THROW ( стек должен быть той же глубины, что и перед CatchMoment ) ;

Это будет работать только при немедленном исполнении из исходного текста (интерпретации), — по сути, CatchMoment ... EndMoment выполняет роль некой разметки.

идея как раз в том, чтобы вот этого:

не делать.

У меня сейчас появилась идея сделать так:

: catchMoment R> CreateExceptionFrame >R ;

: EndMoment R> RemoveExceptionFrame >R ;

буду пробовать

И такая задача возникает достаточно часто. Я уже писал, что решается путем введения векторизованных обработчиков исключений. Его же можно использовать для организации CATCH.

Логично, но вопрос в том, что сделать с СПФом сейчас
Не влазя по уши в src - дело противное и неблагодарное

Если кто-то хочет искупаться, рано или поздно надо будет сказать "уххх!" и прыгнуть в воду. В воде будет теплее

Интересно, но хак это И оно ограниченно словом, непосредственно вызывающим catchMoment (и EndMoment, что обязательно). Если это будет INTERPRET (при нулевом STATE) и EndMoment будет в другой строке — то не сработает.

Увы, это так. А копать глубже опасно.
Так что раздумья продолжаются 8(

Самое, кстати противное в том, что кадр исключения лежит на стеке возвратов, и простым образом перекрыть его опять же не получается.