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