perl 5.003_03: x2p/str.c

Use Configure's FILE_filbuf macro instead of a raw _filbuf.

----------------
Version 5.003_02

diff --git a/x2p/str.c b/x2p/str.c
index e9dd344..953a811 100644 (file)
--- a/x2p/str.c
+++ b/x2p/str.c
@@ -317,7 +317,7 @@ register FILE *fp;
        
        FILE_cnt(fp) = cnt;             /* deregisterize cnt and ptr */
        FILE_ptr(fp) = ptr;
-       i = _filbuf(fp);                /* get more characters */
+       i = FILE_filbuf(fp);            /* get more characters */
        cnt = FILE_cnt(fp);
        ptr = FILE_ptr(fp);             /* reregisterize cnt and ptr */