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

   1 /* $Id$
   2  *
   3  *      getpid() - stub for the FindTask(NULL)
   4  *
   5  *      Copyright © 1994 AmiTCP/IP Group,
   6  *                       Network Solutions Development Inc.
   7  *                       All rights reserved.
   8  *      Copyright © 2005 Pavel Fedin
   9  */
  10
  11 #include <sys/types.h>
  12 #include <proto/exec.h>
  13
  14 pid_t
  15 getpid(void)
  16 {
  17   return (pid_t)FindTask(NULL);
  18 }