mescc: Tinycc support: fclose stub.

* mlibc/include/stdio.h (fclose): Declare.
* mlibc/libc-mes+tcc.c (fclose): Add stub.

diff --git a/mlibc/include/stdio.h b/mlibc/include/stdio.h
index f296e1959fcf948e1869f33074107ba9ffbf9628..3ba382d63bf09dded9a0e8983d61847331f0a79f 100644 (file)
--- a/mlibc/include/stdio.h
+++ b/mlibc/include/stdio.h
@@ -96,6 +96,7 @@ typedef unsigned long size_t;
 #endif
 
 int eputs (char const* s);
+int fclose (FILE *stream);
 FILE *fdopen (int fd, char const *mode);
 int fprintf (FILE *stream, char const *format, ...);
 int fputc (int c, int fd);

diff --git a/mlibc/libc-mes+tcc.c b/mlibc/libc-mes+tcc.c
index ada70c3119731758ef74f5fc88f494c7c4ce6de4..3e0c11465b27b2d7a5e1cf55bc487ab5b724d36d 100644 (file)
--- a/mlibc/libc-mes+tcc.c
+++ b/mlibc/libc-mes+tcc.c
@@ -53,6 +53,11 @@ unlink (char const *file_name)
 }
 
 
+int
+fclose (FILE *stream)
+{
+  return 0;
+}
 
 FILE *
 fdopen (int fd, char const *mode)