Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Revert introduction of non-portable asm snippet in function TclWinCPUID, to restore compilability on Linux. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
2e93a2feb32a53c618c292d21b1edc0f |
| User & Date: | ferrieux 2012-04-30 12:55:24 |
Context
|
2012-04-30
| ||
| 21:53 | Tame deadlocks in broken refchan tests [Bug 3522560] check-in: 29535daab1 user: ferrieux tags: trunk | |
| 21:15 | Explore enforcing the (implied) law that EAGAIN is forbidden for a blocking channel. Violation disco... check-in: 89f82f5eaf user: ferrieux tags: bug-3522560 | |
| 20:21 | Initial TIP 401 patch check-in: e3a37c3439 user: dgp tags: tip-401 | |
| 12:55 | Revert introduction of non-portable asm snippet in function TclWinCPUID, to restore compilability on... check-in: 2e93a2feb3 user: ferrieux tags: trunk | |
| 09:15 | Mention compatibility matters in Changelog. Make test insensitive to ambient compat flag. check-in: 08f40b8f8e user: ferrieux tags: trunk | |
Changes
Changes to unix/tclUnixCompat.c.
| ︙ | ︙ | |||
987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 |
TclWinCPUID(
unsigned int index, /* Which CPUID value to retrieve. */
unsigned int *regsPtr) /* Registers after the CPUID. */
{
int status = TCL_ERROR;
#ifdef HAVE_CPUID
__asm__ __volatile__ ("cpuid":\
"=a" (regsPtr[0]), "=b" (regsPtr[1]), "=c" (regsPtr[2]), "=d" (regsPtr[3]) : "a" (index));
status = TCL_OK;
#endif
return status;
}
/*
* Local Variables:
* mode: c
| > > > | 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 |
TclWinCPUID(
unsigned int index, /* Which CPUID value to retrieve. */
unsigned int *regsPtr) /* Registers after the CPUID. */
{
int status = TCL_ERROR;
#ifdef HAVE_CPUID
/* disabled in emergency -- fails on linux */
# if 0
__asm__ __volatile__ ("cpuid":\
"=a" (regsPtr[0]), "=b" (regsPtr[1]), "=c" (regsPtr[2]), "=d" (regsPtr[3]) : "a" (index));
status = TCL_OK;
# endif
#endif
return status;
}
/*
* Local Variables:
* mode: c
|
| ︙ | ︙ |