------------------------------------------------------------------------
-- These package specifications were extracted from IEEE Std 1003.5-1992,
-- IEEE Standard for Information Technology--POSIX Ada Language
-- Interfaces--Part 1: Binding System Application Program Interface,
-- copyright (c)1992 by the Institute of Electrical and Electronics
-- Engineers, Inc.  These package specifications represent only a portion
-- of the document and are not to be interpreteted as the approved
-- consensus standard.  The IEEE Std 1003.5-1992 must be used in
-- conjunction with these package specifications in order to claim
-- conformance.  The IEEE takes no responsibility for and will assume no
-- liability for damages resulting from the reader's misinpretation of
-- said information resulting from its out of context nature.  To order
-- copies of the IEEE Std 1003.5-1992, please contact the IEEE Service
-- Center at 445 Hoes Lane, PO Box 1331, Piscataway, NJ 08855-1331; via
-- phone at 1-800-678-IEEE, 908-981-1393; or via fax at 908-981-9667.
------------------------------------------------------------------------

with POSIX,
     POSIX_Process_Environment,
     POSIX_Process_Identification;
package POSIX_Unsafe_Process_Primitives is

    -- Process Creation

    function Fork
        return POSIX_Process_Identification.Process_ID;

    -- File Execution

    procedure Exec
            (Pathname : in     POSIX.Pathname;
             Arg_List : in     POSIX.POSIX_String_List
                      := POSIX.Empty_String_List;
             Env_List : in     POSIX_Process_Environment.Environment);

    procedure Exec
            (Pathname : in     POSIX.Pathname;
             Arg_List : in     POSIX.POSIX_String_List
                      := POSIX.Empty_String_List);

    procedure Exec_Search
            (Filename : in     POSIX.Filename;
             Arg_List : in     POSIX.POSIX_String_List
                      := POSIX.Empty_String_List;
             Env_List : in     POSIX_Process_Environment.Environment);

    procedure Exec_Search
            (Filename : in     POSIX.Filename;
             Arg_List : in     POSIX.POSIX_String_List
                      := POSIX.Empty_String_List);

end POSIX_Unsafe_Process_Primitives;