Import Upstream version 20180207
[hcoop/debian/mlton.git] / runtime / basis / Posix / ProcEnv / ProcEnv.c
1 #include "platform.h"
2
3 C_String_t Posix_ProcEnv_ctermid (void) {
4 char *res = ctermid (NULL);
5 return (C_String_t)res;
6 }
7
8 C_GId_t Posix_ProcEnv_getegid (void) {
9 return getegid ();
10 }
11
12 C_UId_t Posix_ProcEnv_geteuid (void) {
13 return geteuid ();
14 }
15
16 C_GId_t Posix_ProcEnv_getgid (void) {
17 return getgid ();
18 }
19
20 C_PId_t Posix_ProcEnv_getpid (void) {
21 return getpid ();
22 }
23
24 C_PId_t Posix_ProcEnv_getppid (void) {
25 return getppid ();
26 }
27
28 C_PId_t Posix_ProcEnv_getpgrp (void) {
29 return getpgrp ();
30 }
31
32 C_UId_t Posix_ProcEnv_getuid (void) {
33 return getuid ();
34 }
35
36 C_Errno_t(C_Int_t) Posix_ProcEnv_setgid (C_GId_t g) {
37 return setgid (g);
38 }
39
40 C_Errno_t(C_Int_t) Posix_ProcEnv_setpgid (C_PId_t p, C_PId_t g) {
41 return setpgid (p, g);
42 }
43
44 C_Errno_t(C_PId_t) Posix_ProcEnv_setsid (void) {
45 return setsid ();
46 }
47
48 C_Errno_t(C_Int_t) Posix_ProcEnv_setuid (C_UId_t u) {
49 return setuid (u);
50 }