Tcl UDP

Check-in [8f50af5314]
Login
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to [email protected]
or submit via the online form by Sep 9.

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

Overview
Comment:Remove check for Win32s which long gone and unsupported by Tcl.
Timelines: family | ancestors | descendants | both | nmake-rules-update
Files: files | file ages | folders
SHA1: 8f50af5314d9e25a4bd87ef3b5c528fe3089f902
User & Date: apnadkarni 2017-08-26 14:47:41
Context
2017-08-26
17:14
Fixed nmake scripts for install-docs and install-libraries. check-in: dbe8e1b6d7 user: apnadkarni tags: nmake-rules-update
14:47
Remove check for Win32s which long gone and unsupported by Tcl. check-in: 8f50af5314 user: apnadkarni tags: nmake-rules-update
14:17
Added -D _WINSOCK_DEPRECATED_NO_WARNING. We still support XP so forced to use deprecated Win32 functions. check-in: 955941c555 user: apnadkarni tags: nmake-rules-update
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/udp_tcl.c.

808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
{
    static int initialized = 0; /* 1 if the socket sys has been initialized. */
    static int hasSockets = 0;  /* 1 if the system supports sockets. */
    HANDLE socketThread;
    DWORD id;
    
    if (!initialized) {
        OSVERSIONINFO info;
        
        initialized = 1;
        
        /*
         * Find out if we're running on Win32s.
         */
        
        info.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
        GetVersionEx(&info);
        
        /*
         * Check to see if Sockets are supported on this system.  Since
         * win32s panics if we call WSAStartup on a system that doesn't
         * have winsock.dll, we need to look for it on the system first.
         * If we find winsock, then load the library and initialize the
         * stub table.
         */
        
        if ((info.dwPlatformId != VER_PLATFORM_WIN32s)
            || (SearchPathA(NULL, "WINSOCK", ".DLL", 0, NULL, NULL) != 0)) {
            hasSockets = InitSockets();
        }
        
        /*
         * Start the socketThread window and set the thread priority of the
         * socketThread as highest
         */
        
        sockList = NULL;






<
<


<
<
<
<
<
<
<
<
<
<
<
|
<
<
<
<
<
|
<







808
809
810
811
812
813
814


815
816











817





818

819
820
821
822
823
824
825
{
    static int initialized = 0; /* 1 if the socket sys has been initialized. */
    static int hasSockets = 0;  /* 1 if the system supports sockets. */
    HANDLE socketThread;
    DWORD id;
    
    if (!initialized) {


        initialized = 1;
        











        /* Load the library and initialize the stub table. */





        hasSockets = InitSockets();

        
        /*
         * Start the socketThread window and set the thread priority of the
         * socketThread as highest
         */
        
        sockList = NULL;