epoc/epoc_stubs.c

   1 /*
   2  *    Copyright (c) 1999 Olaf Flebbe o.flebbe@gmx.de
   3  *
   4  *    You may distribute under the terms of either the GNU General Public
   5  *    License or the Artistic License, as specified in the README file.
   6  *
   7  */
   8
   9 int getgid() {return 0;}
  10 int getegid() {return 0;}
  11 int geteuid() {return 0;}
  12 int getuid() {return 0;}
  13 int setgid() {return -1;}
  14 int setuid() {return -1;}
  15
  16 int Perl_my_popen( int a, int b) {
  17          return 0;
  18 }
  19 int Perl_my_pclose( int a) {
  20          return 0;
  21 }
  22
  23 kill() {}
  24 signal() {}
  25
  26 void execv() {}
  27 void execvp() {}
  28 void do_spawn() {}
  29 void do_aspawn() {}
  30 void Perl_do_exec() {}
  31