Tcl Source Code

Check-in [19382d2dcc]
Login

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

Overview
Comment:syntax error
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-4-branch
Files: files | file ages | folders
SHA1: 19382d2dcc8a9c9aa944d6bf8388327929ee98b8
User & Date: jan.nijtmans 2012-04-24 20:42:44
Context
2012-04-25
11:08
truncation in SetWindowLongPtr data check-in: c69140f170 user: jan.nijtmans tags: core-8-4-branch
2012-04-24
21:02
[Bug 3508771] load tclreg.dll in cygwin tclsh Implement TclWinGetSockOpt, TclWinGetServByName and Tc... check-in: fcc5957e59 user: jan.nijtmans tags: core-8-5-branch
20:42
syntax error check-in: 19382d2dcc user: jan.nijtmans tags: core-8-4-branch
20:21
[Bug 3508771] load tclreg.dll in cygwin tclsh Implement TclWinGetSockOpt, TclWinGetServByName and Tc... check-in: ae92de6078 user: jan.nijtmans tags: core-8-4-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to unix/tclUnixCompat.c.

692
693
694
695
696
697
698

699
700
701
702
703
704
705
706
{
    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
 * c-basic-offset: 4
 * fill-column: 78







>
|







692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
{
    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
 * c-basic-offset: 4
 * fill-column: 78