1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- slang-2.2.4.orig/src/slposio.c
+++ slang-2.2.4/src/slposio.c
@@ -363,7 +363,7 @@
return 0;
}
-static int posix_close (SLFile_FD_Type *f)
+static int posix_close_slfile (SLFile_FD_Type *f)
{
int status = do_close (f);
@@ -1001,7 +1001,7 @@
MAKE_INTRINSIC_2("write", posix_write, V, F, B),
MAKE_INTRINSIC_1("dup_fd", posix_dup, V, F),
MAKE_INTRINSIC_2("dup2_fd", posix_dup2, I, F, I),
- MAKE_INTRINSIC_1("close", posix_close, I, F),
+ MAKE_INTRINSIC_1("close", posix_close_slfile, I, F),
MAKE_INTRINSIC_1("_close", posix_close_fd, I, I),
#if defined(TTYNAME_R)
MAKE_INTRINSIC_0("ttyname", posix_ttyname, V),
|