1 /* Epoc helper Routines */
5 int getgid() {return 0;}
6 int getegid() {return 0;}
7 int geteuid() {return 0;}
8 int getuid() {return 0;}
9 int setgid() {return -1;}
10 int setuid() {return -1;}
15 int Perl_my_popen( int a, int b) {
18 int Perl_my_pclose( int a) {
31 void Perl_do_exec() {}
34 /* Symbian forgot to include __fixunsdfi into the MARM euser.lib */
35 /* This is from libgcc2.c , gcc-2.7.2.3 */
37 typedef unsigned int UQItype __attribute__ ((mode (QI)));
38 typedef int SItype __attribute__ ((mode (SI)));
39 typedef unsigned int USItype __attribute__ ((mode (SI)));
40 typedef int DItype __attribute__ ((mode (DI)));
41 typedef unsigned int UDItype __attribute__ ((mode (DI)));
43 typedef float SFtype __attribute__ ((mode (SF)));
44 typedef float DFtype __attribute__ ((mode (DF)));
48 extern DItype __fixunssfdi (SFtype a);
49 extern DItype __fixunsdfdi (DFtype a);
56 if (a >= - (DFtype) (- 2147483647L -1) )
57 return (SItype) (a + (- 2147483647L -1) ) - (- 2147483647L -1) ;