-- a_funct2.ads       use of interface packages to export to C

-- built using commands:
--    gcc -c a_funct2.adb
--    gnatbl interfex.ali a_funct2.o c_funct2.o

procedure A_Funct2( I : Integer);

-- the Ada compiler must know what language calling convention and Ada name 
pragma Export(C, A_Funct2);
   -- optionally, 
   -- pragma Export ( Convention    => C,
   --                 Entity        => C_Funct2,
   --                 External_Name => "c_funct2",
   --                 Link_Name     => "_c_funct2");