Вопрос про прерывания в паскале, Как кроме моего оставить и штатное? Опции

[Diusha]

Упрощенно прога:

Var xxx : pointer;
{$F+}
Procedure pr; interrupt;
begin
. . . . . .
end;
{F-}
BEGIN
getintvec($08, xxx);
setintvec($08, addr(pr));
. . . . . . .
END.

Вместо срандартного прерывания $08 назначена и выполняется моя процедурка pr, это работает. А как бы так сделать, чтобы кроме pr выполнялась и штатная ПП этого прерывания? (то биш в pr надо как-то вставить CALL (xxx) ???)

[AHTOXA]

Надо отличать минимально необходимые настройки от лишних сущностей.

Настройки есть, как данность. Так что сущностей не добавляется.
[off]Меня удивляет вот что. Человек задал вопрос, на который вы не дали ответа, ибо у вас "нет желания вспоминать". Я дал готовый, проверенный вариант, и тут у вас неожиданно появилось это желание. Выходит, желание раскритиковать сильнее желания помочь?
[/off]

В приведенном случае вызываемя функция вызывается с параметром и декларирована, как обработчик прерывания.

Это где? Вот это чтоль:

Код

type      
          TInterrupt = procedure (Flags: Word);
var
          OldIntHandler : TInterrupt;

? Какой же это обработчик?

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

Естественно стек делается с рассчётом на обработчик прерывания. Это гораздо проще, чем заводить отдельный стек на обработчик. "Зачем плодить лишние сущности"?
А моё возражение было насчёт того, что в DPMI надо делать что-то особенное со стеком, а то без этого не работает.

Не возникает, если Вы не используете локальные переменные в своём обработчике.

Конечно же использую, и ничего не валится. Дело наверное в чём-то другом. Может банально не хватает стека.

[zltigo]

Человек задал вопрос, на который вы не дали ответа, ибо у вас "нет желания вспоминать".

Если быть точным и прочитать написанное мной полностью, то нет желания вспоминать диалект Паскаля не имеющий актуальности с 90x годов. Помочь не оказывался, в том числе и конкретными кодом . И обсуждать начал отнюдь не Паскаль, а подход к делу. Не нервничайте.

? Какой же это обработчик?

Опять через слово читаете это декларация обработчика.

Естественно стек делается с рассчётом на обработчик прерывания.

Да ну А DOS, насамом деле вполне себе многозадачная система - драйвера, TSR-ы, само ядро...
C чего Вы взяли, что прерывать будут исключительно Вашу программу c "рассчитанным" стеком?

[AHTOXA]

Помочь не оказывался, в том числе и конкретными кодом .

Однако же не помогли .

И обсуждать начал отнюдь не Паскаль, а подход к делу. Не нервничайте.

Да я не нервничаю. Просто удивляюсь...

Опять через слово читаете это декларация обработчика.

Это вы через слово цитируете. Вы написали, что

В приведенном случае вызываемя функция вызывается с параметром и декларирована, как обработчик прерывания.

(выделение моё). Вот я и поинтересовался, где она декларирована как обработчик прерывания.

C чего Вы взяли, что прерывать будут исключительно Вашу программу c "рассчитанным" стеком?

Да, тут я был не прав. Посмотрел, почему же тогда у меня всё работало, оказывается я в прерывании работал только с глобальными переменными. Но продолжаю настаивать, что это не зависит от DPMI