[multiple changes]
[gcc.git] / gcc / ada / s-osinte-lynxos.ads
index 9a68feae2d49b785432e69cc733485eb5c7731c6..8b998bcfdf65a4431fd3b98043951b50febd4dbd 100644 (file)
@@ -7,7 +7,7 @@
 --                                  S p e c                                 --
 --                                                                          --
 --             Copyright (C) 1991-1994, Florida State University            --
---          Copyright (C) 1995-2010, Free Software Foundation, Inc.         --
+--          Copyright (C) 1995-2011, Free Software Foundation, Inc.         --
 --                                                                          --
 -- GNAT is free software;  you can  redistribute it  and/or modify it under --
 -- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -199,7 +199,8 @@ package System.OS_Interface is
 
    type clockid_t is private;
 
-   CLOCK_REALTIME : constant clockid_t;
+   CLOCK_REALTIME  : constant clockid_t;
+   CLOCK_MONOTONIC : constant clockid_t;
 
    function clock_gettime
      (clock_id : clockid_t;
@@ -517,7 +518,8 @@ private
    pragma Convention (C, timespec);
 
    type clockid_t is new unsigned_char;
-   CLOCK_REALTIME : constant clockid_t := 0;
+   CLOCK_REALTIME  : constant clockid_t := 1;
+   CLOCK_MONOTONIC : constant clockid_t := CLOCK_REALTIME;
 
    type st_attr_t is record
       stksize      : int;