Ada83 and Ada95 interrupt handling

[Armin <ArminSchmidle@swol.de>]

I am porting an Ada83 application to Ada95. In Ada83 there was a
construction
known as interrupt entry. Assume we have the following task (with two
interrupt
entrys from a DSP and a timer source)

 task type A_Task  is
      entry Startup;
      entry DSP_Interrupt;
      entry Timer_Interrupt;

      for DSP_Interrupt use at System.Value("16#xxxxxxxx#");
      for Timer_Interrupt use at System.Value("16#xxxxxxxx#");

      pragma Priority (Task_Priority.Of_A_Task);
 end A_Task;

 The task waits for the occurence of either the DSP or the timer
(to avoid blocking):
     ...
     ...
      select
         accept DSP_Interrupt; -- wait for interrupt of DSP
         ...
      or
         accept Timer_Interrupt; -- or of timer (to avoid blocking)
        ...
      end select;
      ...
      ...

How can I do the same thing in Ada95 ?

Thanks in advance !
Armin