2 -- Origin: Oliver Kellogg <oliver.kellogg@eads.com>
6 package body Bit_Packed_Array1 is
8 procedure Generate_Callforward is
9 Compiler_Crash : String :=
10 Laser_Illuminator_Code_Group_T'Image
11 (MADR.ISF.Laser_Illuminator_Code (0));
14 end Generate_Callforward;
16 end Bit_Packed_Array1;