2 -- Origin: Oliver Kellogg <oliver.kellogg@eads.com>
6 package body Bit_Packed_Array 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;