Re: Addressing functions

["Theodore E. Dennison" <dennison@escmail.mmc.orl.com>]

 In article <3citrc$bb5@earth.usa.net> wbuckley@earth (Bill Buckley) writes:
 
  > For instance if I were to have an array of subprogram addresses
  > A(1..2) => (1 => Print1'ADDRESS,
  >             2 => Print2'ADDRESS);
  > how could I implement the calling these functions...I have heard
  > from several other Ada programmers that this may not be possible.
 

To get the same effect (but in a "safe" manner), why not do the
following? :

   subtype Procedure_Range is 1..2;
   procedure A (Index : in Procedure_Range) is
   begin
      case Index is
         when 1 => Print1;
         when 2 => Print2;
      end case;
   end A;

This way you are calling explicit procedures, rather than jumping
to addresses containing "Lord-only-knows-what".

There is a very good reason for a lot of what Ada prevents you from
doing.

T.E.D.