summaryrefslogtreecommitdiffstats
path: root/win/tclWinFile.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-10-30 20:41:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-10-30 20:41:01 (GMT)
commit4c1c62892ab4c909053abeef49d6d223c8c2e586 (patch)
tree0acde56fe8835999a70827713ce89d8001fc3019 /win/tclWinFile.c
parent538c6791ab793020033429d22b2f0e21efdd43e9 (diff)
parent434a115a3c3cbd45b3e01a1af2ad1e960077a056 (diff)
downloadtcl-4c1c62892ab4c909053abeef49d6d223c8c2e586.zip
tcl-4c1c62892ab4c909053abeef49d6d223c8c2e586.tar.gz
tcl-4c1c62892ab4c909053abeef49d6d223c8c2e586.tar.bz2
Merge 8.5
Diffstat (limited to 'win/tclWinFile.c')
-rwxr-xr-x[-rw-r--r--]win/tclWinFile.c9
1 files changed, 9 insertions, 0 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index fc189da..b9787c7 100644..100755
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -531,6 +531,11 @@ TclWinSymLinkDelete(
*--------------------------------------------------------------------
*/
+#if defined (__clang__) || ((__GNUC__) && ((__GNUC__ > 4) || ((__GNUC__ == 4) && (__GNUC_MINOR__ > 5))))
+#pragma GCC diagnostic push
+#pragma GCC diagnostic ignored "-Warray-bounds"
+#endif
+
static Tcl_Obj *
WinReadLinkDirectory(
const TCHAR *linkDirPath)
@@ -648,6 +653,10 @@ WinReadLinkDirectory(
Tcl_SetErrno(EINVAL);
return NULL;
}
+
+#if defined (__clang__) || ((__GNUC__) && ((__GNUC__ > 4) || ((__GNUC__ == 4) && (__GNUC_MINOR__ > 5))))
+#pragma GCC diagnostic pop
+#endif
/*
*--------------------------------------------------------------------