1 // ----------------------------------------------------------------------------
3 // ----------------------------------------------------------------------------
4 // Public Domain C Library - http://pdclib.sourceforge.net
5 // This code is Public Domain. Use, modify, and redistribute at will.
6 // ----------------------------------------------------------------------------
8 long ftell( FILE * stream ) { /* TODO */ };
10 /* PDPC code - unreviewed
12 return (stream->bufStartR + (stream->upto - stream->fbuf));