Merged PDPCLIB and Therx code.

[pdclib] / functions / stdio / ftell.c

diff --git a/functions/stdio/ftell.c b/functions/stdio/ftell.c
index d531292d0147c647be160a4a425f0bb370064400..f4efecdf7973ce1ae10d69b99f841f85566af115 100644 (file)
--- a/functions/stdio/ftell.c
+++ b/functions/stdio/ftell.c
@@ -6,3 +6,9 @@
 // ----------------------------------------------------------------------------
 
 long ftell( FILE * stream ) { /* TODO */ };
+
+/* PDPC code - unreviewed
+{
+    return (stream->bufStartR + (stream->upto - stream->fbuf));
+}
+*/