comparison gcc/ada/libgnarl/s-osinte__lynxos178e.ads @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children 1830386684a0
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
5 -- S Y S T E M . O S _ I N T E R F A C E -- 5 -- S Y S T E M . O S _ I N T E R F A C E --
6 -- -- 6 -- --
7 -- S p e c -- 7 -- S p e c --
8 -- -- 8 -- --
9 -- Copyright (C) 1991-1994, Florida State University -- 9 -- Copyright (C) 1991-1994, Florida State University --
10 -- Copyright (C) 1995-2017, Free Software Foundation, Inc. -- 10 -- Copyright (C) 1995-2018, Free Software Foundation, Inc. --
11 -- -- 11 -- --
12 -- GNAT is free software; you can redistribute it and/or modify it under -- 12 -- GNAT is free software; you can redistribute it and/or modify it under --
13 -- terms of the GNU General Public License as published by the Free Soft- -- 13 -- terms of the GNU General Public License as published by the Free Soft- --
14 -- ware Foundation; either version 3, or (at your option) any later ver- -- 14 -- ware Foundation; either version 3, or (at your option) any later ver- --
15 -- sion. GNAT is distributed in the hope that it will be useful, but WITH- -- 15 -- sion. GNAT is distributed in the hope that it will be useful, but WITH- --
418 (cond : access pthread_cond_t; 418 (cond : access pthread_cond_t;
419 mutex : access pthread_mutex_t; 419 mutex : access pthread_mutex_t;
420 abstime : access timespec) return int; 420 abstime : access timespec) return int;
421 pragma Import (C, pthread_cond_timedwait, "pthread_cond_timedwait"); 421 pragma Import (C, pthread_cond_timedwait, "pthread_cond_timedwait");
422 422
423 Relative_Timed_Wait : constant Boolean := False;
424 -- pthread_cond_timedwait requires an absolute delay time
425
426 -------------------------- 423 --------------------------
427 -- POSIX.1c Section 13 -- 424 -- POSIX.1c Section 13 --
428 -------------------------- 425 --------------------------
429 426
430 PTHREAD_PRIO_NONE : constant := 0; 427 PTHREAD_PRIO_NONE : constant := 0;
451 policy : int; 448 policy : int;
452 param : access struct_sched_param) return int; 449 param : access struct_sched_param) return int;
453 pragma Import (C, pthread_setschedparam, "pthread_setschedparam"); 450 pragma Import (C, pthread_setschedparam, "pthread_setschedparam");
454 451
455 function pthread_attr_setscope 452 function pthread_attr_setscope
456 (attr : access pthread_attr_t; 453 (Unused_attr : access pthread_attr_t;
457 contentionscope : int) return int is (0); 454 Unused_contentionscope : int) return int is (0);
458 -- pthread_attr_setscope is not implemented in production mode 455 -- pthread_attr_setscope is not implemented in production mode
459 456
460 function pthread_attr_setinheritsched 457 function pthread_attr_setinheritsched
461 (attr : access pthread_attr_t; 458 (attr : access pthread_attr_t;
462 inheritsched : int) return int; 459 inheritsched : int) return int;