/*
 *	Function	CopyFile
 *	Programmer	N.d'Alterio
 *	Date		05/05/96
 *
 *  Synopsis:	Copy contents of one file to another, both files
 *		should be open.
 *
 *  Arguments:	in_fptr			Input file pointer
 *		out_fptr		Output file pointer
 *
 *  Returns:	None
 *
 *  Variables:	ch			Character buffer
 * 
 *  Functions:	fgetc			Get char (ANSI)
 *		fputc			Put char (ANSI)
 *
 *  $Id: CopyFile.c 1.1 1996/05/06 22:55:02 nagd Exp $
 *
 */

#include <stdio.h>

void CopyFile( FILE *in_fptr, FILE *out_fptr )

{ 
               
  int ch;

  while ( ( ch = fgetc( in_fptr ) ) != EOF ) fputc( ch, out_fptr );
 
  return;

}   /* end function CopyFile */

/*========================================================================*
                            END FUNCTION CopyFile
 *========================================================================*/