# pragma l   /* list off */
# pragma p   /* non portable */

/**************************************************************************

                       H.STDIO - standard input/output
                       -------------------------------

Author : David Allison
Date   : 10 July 1987
Issue  : 1.0

(C) 1987 Beebug Limited

*************************************************************************/

/* standard input/output macros and functions */

# redef NULL 0
# redef TRUE 1
# redef FALSE 0

# define EOF (-1)
# define FILE short 

# define fpos_t long

# redef size_t int

# define SEEK_SET 0
# define SEEK_CUR 1
# define SEEK_END 2

extern int printf (char *format,...) ;
extern int scanf (char *format,...) ;
extern int sprintf (char *s,char *format,...) ;
extern int sscanf (char *s,char *format,...) ;
extern int fprintf (FILE *stream,char *format,...) ;
extern int fscanf (FILE *stream,char *format,...) ;
extern int fclose (FILE *stream) ;
extern FILE *fopen (char *filename,char *mode) ;
extern FILE *freopen (char *s, char *mode, FILE *stream) ;
extern int fputc (int c,FILE *stream);
extern int fputs (char *s,FILE *stream) ;
extern int puts (char *s) ;
extern int fgetc (FILE *stream) ;
extern int ungetc (int c, FILE *stream) ;
extern char *fgets (char *s,int n,FILE *stream) ;
extern char *gets (char *s);
extern int fgetpos (FILE *stream, fpos_t *pos) ;
extern int fseek (FILE *stream, long offset, int whence) ;
extern int fsetpos (FILE *stream, fpos_t *pos);
extern fpos_t ftell (FILE *stream) ;
extern void rewind (FILE *stream) ;
extern int feof (FILE *stream) ;
extern int bget (FILE *stream) ;
extern int bput (FILE *stream, char c) ;
extern int remove (char *name) ;
extern int rename (char *old, char *new) ;
extern int fflush (FILE *stream) ;
extern int fread (char *ptr, size_t size, size_t num, FILE *stream) ;
extern int fwrite (char *ptr, size_t size, size_t num, FILE *stream) ;

extern FILE *stdin,
            *stdout,
            *stderr;

# define putc(c,s) fputc (c,s)
# define getc(s) fgetc (s)
# define putchar(c) fputc ((c),stdout)
# define getchar() fgetc (stdin)
# define clearerr(stream)
# define ferror(stream) 0

