Celestin Apprentice 2/Apprentice-Release2.iso/Tools/Languages/GCC 1.37.1r14/usr/lib/mac/fcntl.c

C/C++ Source or Header | 1993-12-08 | 306 b | 18 lines | [TEXT/JRRK]

#include <fcntl.h>
#include <stdarg.h>
#include <sys/types.h>

int fcntl(int fd, int cmd, ...)
     {
     int arg;
     va_list args;
     va_start(args, cmd);
     arg = va_arg(args, int);
     mysleep(1);
     switch(cmd)
         {
         case F_DUPFD : return dup2(fd, next_fd(arg)); break;
         }
     }