-- --
-- B o d y --
-- --
--- $Revision: 1.38 $
+-- $Revision$
-- --
-- Copyright (C) 1991-2001 Florida State University --
-- --
-- Initialize_ATCB --
---------------------
- -- Call this only with abort deferred and holding All_Tasks_L.
-
procedure Initialize_ATCB
(Self_ID : Task_ID;
Task_Entry_Point : Task_Procedure_Access;