PDCLIB-15 PDCLIB-16:

[pdclib] / functions / stdio / flockfile.c

diff --git a/functions/stdio/flockfile.c b/functions/stdio/flockfile.c
new file mode 100644 (file)
index 0000000..4e80daf
--- /dev/null
+++ b/functions/stdio/flockfile.c
@@ -0,0 +1,32 @@
+/* flockfile(FILE * )\r
+\r
+   This file is part of the Public Domain C Library (PDCLib).\r
+   Permission is granted to use, modify, and / or redistribute at will.\r
+*/\r
+\r
+#include <stdio.h>\r
+#include <stdarg.h>\r
+\r
+#ifndef REGTEST\r
+#include <threads.h>\r
+#include <stdlib.h>\r
+\r
+void flockfile( FILE * file )\r
+{\r
+    if( mtx_lock( &file->lock ) != thrd_success ) {\r
+        abort();\r
+    }\r
+}\r
+\r
+#endif\r
+\r
+#ifdef TEST\r
+#include <_PDCLIB_test.h>\r
+\r
+int main( void )\r
+{\r
+    // Not tested here - tested by other stdio test drivers\r
+    return TEST_RESULTS;\r
+}\r
+\r
+#endif\r