with Ada.Finalization, Interfaces.C;
package Stdarg is
ArgList
Empty
MaxArguments : constant := 50;
type ArgList is private;
function Empty return ArgList;
generic type T is private; T_Is_Modular : Boolean := False; T_Is_Float : Boolean := False; function Concat (Args : ArgList; Arg : T) return ArgList;
subtype C_Param is Interfaces.C.long;
private -- Implementation-defined ...
end Stdarg;