workbench/network/stacks/AROSTCP/netlib/getppid.c

   1 #define AROS_MORPHOS_COMPATIBLE
   2
   3 #include <exec/tasks.h>
   4 #include <sys/types.h>
   5 #include <proto/exec.h>
   6
   7 pid_t
   8 getppid(void)
   9 {
  10   struct Task *ThisTask;
  11
  12   ThisTask = FindTask(NULL);
  13   return (pid_t)ThisTask->tc_ETask->Parent;
  14 }
  15