diff options
Diffstat (limited to 'gcc/ada/s-osinte-tru64.ads')
| -rw-r--r-- | gcc/ada/s-osinte-tru64.ads | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/gcc/ada/s-osinte-tru64.ads b/gcc/ada/s-osinte-tru64.ads index 83471727b1b..0fcd4221e80 100644 --- a/gcc/ada/s-osinte-tru64.ads +++ b/gcc/ada/s-osinte-tru64.ads @@ -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- -- @@ -191,9 +191,7 @@ package System.OS_Interface is function nanosleep (rqtp, rmtp : access timespec) return int; pragma Import (C, nanosleep); - type clockid_t is private; - - CLOCK_REALTIME : constant clockid_t; + type clockid_t is new int; function clock_gettime (clock_id : clockid_t; @@ -506,9 +504,6 @@ private end record; pragma Convention (C, timespec); - type clockid_t is new int; - CLOCK_REALTIME : constant clockid_t := 1; - type unsigned_long_array is array (Natural range <>) of unsigned_long; type pthread_t is new System.Address; |