mescc: Tinycc support: fclose.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sun, 30 Jul 2017 12:51:59 +0000 (14:51 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sun, 30 Jul 2017 12:51:59 +0000 (14:51 +0200)
* mlibc/libc-mes+tcc.c (fclose): Implement.

mlibc/libc-mes+tcc.c

index 44e3bfbce92efc09327f3b436f4c010f4dc04b3a..5e880a5b6736c88c78584fbf9d6068cf46a3132e 100644 (file)
@@ -98,15 +98,14 @@ execvp (char const *file, char *const argv[])
 int
 fclose (FILE *stream)
 {
-  eputs ("fclose stub\n");
-  return 0;
+  int fd = (int)stream;
+  return close (fd);
 }
 
 FILE *
 fdopen (int fd, char const *mode)
 {
-  eputs ("fdopen stub\n");
-  return 0;
+  return (FILE*)fd;
 }
 
 int