diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-25 15:10:55 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-25 15:10:55 (GMT) |
| commit | 0657f97bc5e5f5b835c2c60713f306fb97950a89 (patch) | |
| tree | 4b9fb375f578e97c99edcb9c67d5fde38ede1464 /generic/tclTest.c | |
| parent | 231fd112f959c258117188b044681643f30129f1 (diff) | |
| download | tcl-0657f97bc5e5f5b835c2c60713f306fb97950a89.zip tcl-0657f97bc5e5f5b835c2c60713f306fb97950a89.tar.gz tcl-0657f97bc5e5f5b835c2c60713f306fb97950a89.tar.bz2 | |
Eliminate some clang warnings. Only use "testbigdata" if sizeof(Tcl_Size) == sizeof(Tcl_WideInt)
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index ec2f4a3..f0dd5bc 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -5761,6 +5761,9 @@ TestbytestringObjCmd( #if !defined(TCL_NO_DEPRECATED) # if defined(_MSC_VER) && !defined(NDEBUG) # pragma warning(disable:4133) +# elif defined(__clang__) +# pragma clang diagnostic push +# pragma clang diagnostic ignored "-Wincompatible-pointer-types" # endif int n; /* On purpose, not Tcl_Size, in order to demonstrate what happens */ #else @@ -5779,6 +5782,10 @@ TestbytestringObjCmd( if (p == NULL) { return TCL_ERROR; } +#if !defined(TCL_NO_DEPRECATED) && defined(__clang__) +# pragma clang diagnostic pop +#endif + if (x.m != 1) { Tcl_AppendResult(interp, "Tcl_GetBytesFromObj() overwrites variable", NULL); return TCL_ERROR; |