Listing 5

/****************************************************/
/*                                                  */
/*             iolink.c                             */
/*                                                  */
/*         stdio tie for Turbo C/C++ Compilers      */
/*                                                  */
/*           Copyright (C) 1990                     */
/*           Pasquale J. Villani                    */
/*           All Rights Reserved                    */
/*                                                  */
/****************************************************/

#include <stdio.h>

FILE _streams[20];

fputc(c, f)
char c;
FILE *f;
{
   return _fputc(c, f);
}
_fputc(c, f)
char c;
FILE *f;
{
   if(write(1, &c, 1) == 1)
      return c;
   else
      return EOF;
}

_fgetc(f)
FILE *f;
{
   char c;
   
   if(read(0, &c, 1) != 1)
      return EOF;
   else
      return c;
}