summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixCompat.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-20 09:58:52 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-03-20 09:58:52 (GMT)
commit3e01654c1a5a2ba61662be868e3ad462906c7b0f (patch)
tree0787c7eb92e0ef00e18ed6b89cdf04287058cec8 /unix/tclUnixCompat.c
parent2c7e68e5aeb40ae5340c57d4f80ef18a56a7db22 (diff)
parent23f5b19d027c7c6f2eec97dd900569b56a9087f7 (diff)
downloadtcl-3e01654c1a5a2ba61662be868e3ad462906c7b0f.zip
tcl-3e01654c1a5a2ba61662be868e3ad462906c7b0f.tar.gz
tcl-3e01654c1a5a2ba61662be868e3ad462906c7b0f.tar.bz2
[Bug 3508771] load tclreg.dll in cygwin tclsh
Diffstat (limited to 'unix/tclUnixCompat.c')
-rw-r--r--unix/tclUnixCompat.c37
1 files changed, 37 insertions, 0 deletions
diff --git a/unix/tclUnixCompat.c b/unix/tclUnixCompat.c
index 4d959d6..782d70c 100644
--- a/unix/tclUnixCompat.c
+++ b/unix/tclUnixCompat.c
@@ -794,3 +794,40 @@ CopyString(
* fill-column: 78
* End:
*/
+
+/*
+ *------------------------------------------------------------------------
+ *
+ * TclWinCPUID --
+ *
+ * Get CPU ID information on an Intel box under UNIX (either Linux or Cygwin)
+ *
+ * Results:
+ * Returns TCL_OK if successful, TCL_ERROR if CPUID is not supported or
+ * fails.
+ *
+ * Side effects:
+ * If successful, stores EAX, EBX, ECX and EDX registers after the CPUID
+ * instruction in the four integers designated by 'regsPtr'
+ *
+ *----------------------------------------------------------------------
+ */
+
+int
+TclWinCPUID(
+ unsigned int index, /* Which CPUID value to retrieve. */
+ unsigned int *regsPtr) /* Registers after the CPUID. */
+{
+ int status = TCL_ERROR;
+
+ /* There is no reason this couldn't be implemented on UNIX as well */
+ return status;
+}
+
+/*
+ * Local Variables:
+ * mode: c
+ * c-basic-offset: 4
+ * fill-column: 78
+ * End:
+ */