Tcl Source Code

Check-in [af92e19f2c]
Login

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

Overview
Comment:oops, wrong signature
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | bug-3508771
Files: files | file ages | folders
SHA1: af92e19f2cf6e46bee4ee0d7cc571dee4049e73f
User & Date: jan.nijtmans 2012-04-24 13:10:04
Context
2012-04-24
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
13:10
oops, wrong signature Closed-Leaf check-in: af92e19f2c user: jan.nijtmans tags: bug-3508771
12:55
implement TclWinGetSockOpt and TclWinGetServByName for cygwi (should work, but not yet tested on UNI... check-in: 6d0fea34a0 user: jan.nijtmans tags: bug-3508771
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclStubInit.c.

121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
	    const char *optval, int optlen)
{
    return setsockopt((int) s, level, optname, optval, optlen);
}

static int
TclWinGetSockOpt(void *s, int level, int optname,
	    char *optval, int optlen)
{
    return getsockopt((int) s, level, optname, optval, optlen);
}

struct servent *
TclWinGetServByName(const char *name, const char *proto)
{







|







121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
	    const char *optval, int optlen)
{
    return setsockopt((int) s, level, optname, optval, optlen);
}

static int
TclWinGetSockOpt(void *s, int level, int optname,
	    char *optval, int *optlen)
{
    return getsockopt((int) s, level, optname, optval, optlen);
}

struct servent *
TclWinGetServByName(const char *name, const char *proto)
{