1 files changed, 7 insertions, 0 deletions
diff --git a/otherlibs/unix/geteuid.c b/otherlibs/unix/geteuid.c
new file mode 100644
index 0000000000..e7e8d4c4ab
--- /dev/null
+++ b/otherlibs/unix/geteuid.c
@@ -0,0 +1,7 @@
+#include <mlvalues.h>
+#include "unix.h"
+
+value unix_geteuid()             /* ML */
+{
+  return Val_int(geteuid());
+}