X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Ffgetc.c;h=ae7a8356685540e2582a1c5dcc7a9b350a530c18;hb=6ca24b75c75b9c6f22e1e69693d326b8e3330841;hp=b5a32572158fd89dc2875d65dfca75407073d231;hpb=f91c757a54bdfb3d0ee43e5352973b9f940f0a71;p=pdclib

diff --git a/functions/stdio/fgetc.c b/functions/stdio/fgetc.c
index b5a3257..ae7a835 100644
--- a/functions/stdio/fgetc.c
+++ b/functions/stdio/fgetc.c
@@ -8,11 +8,11 @@
 
 #include <stdio.h>
 
-#include <_PDCLIB_glue.h>
-
 #ifndef REGTEST
 
-int fgetc( struct _PDCLIB_file_t * stream )
+#include <_PDCLIB_glue.h>
+
+int fgetc_unlocked( struct _PDCLIB_file_t * stream )
 {
     if ( _PDCLIB_prepread( stream ) == EOF )
     {
@@ -25,6 +25,14 @@ int fgetc( struct _PDCLIB_file_t * stream )
     return (unsigned char)stream->buffer[stream->bufidx++];
 }
 
+int fgetc( struct _PDCLIB_file_t * stream )
+{
+    flockfile( stream );
+    int c = fgetc_unlocked( stream );
+    funlockfile( stream );
+    return c;
+}
+
 #endif
 
 #ifdef TEST