Tcl Source Code

Check-in [c233837119]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:3390638 Workaround broken solaris studio cc optimizer. Thanks to Wolfgang S. Kechel.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: c233837119ea3f3ed0777b74636fc794b77ae6dd
User & Date: dgp 2011-09-13 20:03:34
Context
2011-09-16
08:28
[Bug 3391977]: Ensure that the -headers option to http::geturl overrides the -type option (important... check-in: 0031bc6888 user: dkf tags: core-8-5-branch
2011-09-13
20:04
3390638 Workaround broken solaris studio cc optimizer. Thanks to Wolfgang S. Kechel. check-in: b9fb2d7653 user: dgp tags: trunk
20:03
3390638 Workaround broken solaris studio cc optimizer. Thanks to Wolfgang S. Kechel. check-in: c233837119 user: dgp tags: core-8-5-branch
20:02
3390638 Workaround broken solaris studio cc optimizer. Thanks to Wolfgang S. Kechel. check-in: 678d621890 user: dgp tags: core-8-4-branch
18:23
3405652 Portability workaround for broken system DTrace support. Thanks to Dagobert Michelson. check-in: 2836989501 user: dgp tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ChangeLog.

1



2
3
4
5
6
7
8
2011-09-13  Don Porter  <[email protected]>




	* generic/tclDTrace.d:	[Bug 3405652] Portability workaround for
	broken system DTrace support.  Thanks to Dagobert Michelson.

2011-09-12  Jan Nijtmans  <[email protected]>

	* win/tclWinPort.h: [Bug 3407070] tclPosixStr.c won't build with

>
>
>







1
2
3
4
5
6
7
8
9
10
11
2011-09-13  Don Porter  <[email protected]>

	* generic/tclUtil.c:	[Bug 3390638] Workaround broken solaris
	studio cc optimizer.  Thanks to Wolfgang S. Kechel.

	* generic/tclDTrace.d:	[Bug 3405652] Portability workaround for
	broken system DTrace support.  Thanks to Dagobert Michelson.

2011-09-12  Jan Nijtmans  <[email protected]>

	* win/tclWinPort.h: [Bug 3407070] tclPosixStr.c won't build with

Changes to generic/tclUtil.c.

3161
3162
3163
3164
3165
3166
3167

3168
3169
3170
3171
3172
3173
3174
3175

    /*
     * Check whether "n" is the maximum negative value. This is
     * -2^(m-1) for an m-bit word, and has no positive equivalent;
     * negating it produces the same value.
     */


    if (n == -n) {
	return sprintf(buffer, "%ld", n);
    }

    /*
     * Generate the characters of the result backwards in the buffer.
     */








>
|







3161
3162
3163
3164
3165
3166
3167
3168
3169
3170
3171
3172
3173
3174
3175
3176

    /*
     * Check whether "n" is the maximum negative value. This is
     * -2^(m-1) for an m-bit word, and has no positive equivalent;
     * negating it produces the same value.
     */

    intVal = -n;			/* [Bug 3390638] Workaround for*/
    if (n == -n || intVal == n) {	/* broken compiler optimizers. */
	return sprintf(buffer, "%ld", n);
    }

    /*
     * Generate the characters of the result backwards in the buffer.
     */