ftp.nice.ch/pub/next/developer/languages/ada/gnat.1.83.N.b.tar.gz#/gnat-1.83-m68k-next-bin/rts/fileno.c

This is fileno.c in view mode; [Download] [Up]

#include <stdio.h>

#ifdef fileno
#undef fileno
#endif

int fileno(FILE* f)
{
	return (f->_file);
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.