------------------------------------------------------------------------------ -- -- -- POSIX.5b VALIDATION TEST SUITE -- -- -- -- P 9 9 0 0 8 0 a -- -- -- -- S p e c -- -- -- -- -- -- Copyright (c) 1999 Florida State University (FSU). All Rights -- -- Reserved. -- -- -- -- This is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free -- -- Software Foundation; either version 2, or (at your option) any later -- -- version. This software is distributed in the hope that it will be -- -- useful, but WITHOUT ANY WARRANTY; without even the implied warranty of -- -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -- -- General Public License for more details. You should have received a -- -- copy of the GNU General Public License distributed with GNARL; see -- -- file COPYING. If not, write to the Free Software Foundation, 59 -- -- Temple Place - Suite 330, Boston, MA 02111-1307, USA. -- -- -- -- Under contract GS-35F-4506G, the U. S. Government obtained unlimited -- -- rights in the software and documentation contained herein. Unlimited -- -- rights are defined in DFAR 252,227-7013(a)(19). By making this public -- -- release, the Government intends to confer upon all recipients -- -- unlimited rights equal to those held by the Government. These rights -- -- include rights to use, duplicate, release or disclose the released -- -- data an computer software in whole or in part, in any manner and for -- -- any purpose whatsoever, and to have or permit others to do so. -- -- -- -- DISCLAIMER -- ALL MATERIALS OR INFORMATION HEREIN RELEASED, MADE -- -- AVAILABLE OR DISCLOSED ARE AS IS. THE GOVERNMENT MAKES NO EXPRESS OR -- -- IMPLIED WARRANTY AS TO ANY MATTER WHATSOEVER, INCLUDING THE CONDITIONS -- -- OF THE SOFTWARE, DOCUMENTATION OR OTHER INFORMATION RELEASED, MADE -- -- AVAILABLE OR DISCLOSED, OR THE OWNERSHIP, MERCHANTABILITY, OR FITNESS -- -- FOR A PARTICULAR PURPOSE OF SAID MATERIAL. -- -- -- ------------------------------------------------------------------------------ -- [$Revision: 1.1 $] -- Simulate mix of periodic jobs with rate monotone priorities. -- See P9900doc.ads for more detailed explanation. with P9900doc, P9900x0, P990001a, -- protected objects P990002d, -- Ada.Real_Time and delay until P990003a; -- locally shared data package P990080a is new P9900x0 (Version => "80", Needs_Clock_Realtime => False, Jobs_Are_Processes => False, Initialize_Sync => P990001a.Initialize, Do_Input => P990001a.Do_Input, Do_Output => P990001a.Do_Output, Start_All_Jobs => P990001a.Start_All_Jobs, Await_All_Jobs_Done => P990001a.Await_All_Jobs_Done, Await_Start => P990001a.Await_Start, Done_Job => P990001a.Done_Job, Finalize_Sync => P990001a.Finalize, Initialize_Scheduling => P990002d.Initialize_Scheduling, Reschedule => P990002d.Reschedule, Finalize_Scheduling => P990002d.Finalize, Shared_Data => P990003a.Shared_Data, Finalize_Shared_Data => P990003a.Finalize ); ---------------------- -- REVISION HISTORY -- ---------------------- -- ---------------------------- -- revision 1.1 -- date: 1998/06/28 21:20:40; author: baker; state: Exp; -- Initial revision -- ---------------------------- -- revision 1.2 locked by: baker; -- date: 1998/06/30 13:30:45; author: baker; state: Exp; lines: +4 -3 -- Added finalization. -- ---------------------------- -- New changes after this line. Each line starts with: "-- " -- Added Initialize_Sync.