pragma Ada_2012;

pragma Style_Checks (Off);
pragma Warnings (Off, "-gnatwu");

with Interfaces.C; use Interfaces.C;

package utimeval_h is

   --  arg-macro: function timerisset (tvp)
   --    return (tvp).tv_sec  or else  (tvp).tv_usec;
   --  arg-macro: function timercmp (tvp, uvp, cmp)
   --    return (tvp).tv_sec cmp (uvp).tv_sec  or else  ((tvp).tv_sec = (uvp).tv_sec  and then  (tvp).tv_usec cmp (uvp).tv_usec);
   --  arg-macro: procedure timerclear (tvp)
   --    (tvp).tv_sec := (tvp).tv_usec := 0
  --*
  -- * This file has no copyright assigned and is placed in the Public Domain.
  -- * This file is part of the mingw-w64 runtime package.
  -- * No warranty is given; refer to the file DISCLAIMER.PD within this package.
  --  

   type timeval is record
      tv_sec : aliased long;  -- D:/M/msys64/mingw64/include/_timeval.h:12
      tv_usec : aliased long;  -- D:/M/msys64/mingw64/include/_timeval.h:13
   end record
   with Convention => C_Pass_By_Copy;  -- D:/M/msys64/mingw64/include/_timeval.h:10

end utimeval_h;

pragma Style_Checks (On);
pragma Warnings (On, "-gnatwu");
