source: trunk/essentials/dev-lang/perl/epoc/epoc_stubs.c@ 3299

Last change on this file since 3299 was 3181, checked in by bird, 19 years ago

perl 5.8.8
File size: 350 bytes
Line 
1/*
2 * Copyright (c) 1999 Olaf Flebbe [email protected]
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
9int setgid() {return -1;}
10int setuid() {return -1;}
11