git.zerfleddert.de Git - micropolis/blob - src/tclx/ossupp/fcntl.c

   1 /*
   2  * fcntl.c
   3  *
   4  * Public-domain relatively quick-and-dirty implemenation of
   5  * ANSI library routine for System V Unix systems.
   6  *
   7  * It's written in old-style C for maximal portability.
   8  *
   9  * Arnold Robbins
  10  * January, February, 1991
  11  *
  12  * Fixes from ado@elsie.nci.nih.gov
  13  * February 1991
  14  *-----------------------------------------------------------------------------
  15  * $Id: fcntl.c,v 2.0 1992/10/16 04:52:16 markd Rel $
  16  *-----------------------------------------------------------------------------
  17  */
  18
  19 /*
  20  * To avoid Unix version problems, this code has been simplified to avoid
  21  * const and size_t, however this can cause an incompatible definition on
  22  * ansi-C systems, so a game is played with defines to ignore a strftime
  23  * declaration in time.h
  24  */
  25
  26 #include <stdio.h>
  27
  28
  29 /* fcntl --- performs open file attribute access */
  30
  31 int
  32 fcntl(fd, cmd, arg)
  33     int    fd;
  34     int    cmd;
  35     int    arg;
  36 {
  37     int rc = 0;
  38
  39     return rc;
  40 }