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