1 files changed, 11 insertions, 0 deletions
diff --git a/c/src/exec/libcsupport/src/creat.c b/c/src/exec/libcsupport/src/creat.c
new file mode 100644
index 0000000000..6b11162060
--- /dev/null
+++ b/c/src/exec/libcsupport/src/creat.c
@@ -0,0 +1,11 @@
+/* creat() "system call" */
+
+/* This is needed by f2c and therefore the SPEC benchmarks.  */
+
+#include <fcntl.h>
+
+int
+creat (const char *path, mode_t mode)
+{
+  return open (path, O_WRONLY | O_CREAT | O_TRUNC, mode);
+}