D 2013-11-09T16:28:58.404
J assignee nobody
J closer nobody
J cmimetype text/plain
J comment The\smacro\sEXCEPTION_REGISTRATION\shas\sto\sbe\sreplaced\sby\sTCL_EXCEPTION_REGISTRATION\sin\sthe\sfiles\stclWin32Dll.c,\stclWinChan.c\sand\stclWinFCmd.c\r\n\r\nOtherwise\smake\sstops\swith\san\serror.\r\n\r\nAlexey\sPavlov\shas\screated\san\sappropriate\spatch\sfor\sTcl\s8.6.1\r\n\r\nhttps://github.com/Alexpux/mingw-builds/blob/master/patches/tcl/tcl-8.6.1-mingwexcept.patch\r\n\r\nFor\sa\s8.5.15\spatch\ssee\sthe\slines\sbelow:\r\n\r\n---\stclWin32Dll.c.orig\t2013-08-30\s17:58:40.000000000\s+0200\r\n+++\stclWin32Dll.c\t2013-11-08\s08:55:00.742333794\s+0100\r\n@@\s-53,14\s+53,14\s@@\sstatic\sint\splatformId;\t\t/*\sRunning\sunder\r\n\s\s*\sthem\sby\screating\san\sEXCEPTION_REGISTRATION\swithin\sthe\sactivation\srecord.\r\n\s\s*/\r\n\s\r\n-typedef\sstruct\sEXCEPTION_REGISTRATION\s{\r\n-\s\s\s\sstruct\sEXCEPTION_REGISTRATION\s*link;\r\n+typedef\sstruct\sTCL_EXCEPTION_REGISTRATION\s{\r\n+\s\s\s\sstruct\sTCL_EXCEPTION_REGISTRATION\s*link;\r\n\s\s\s\s\sEXCEPTION_DISPOSITION\s(*handler)(\r\n\s\t\s\s\s\sstruct\s_EXCEPTION_RECORD*,\svoid*,\sstruct\s_CONTEXT*,\svoid*);\r\n\s\s\s\s\svoid\s*ebp;\r\n\s\s\s\s\svoid\s*esp;\r\n\s\s\s\s\sint\sstatus;\r\n-}\sEXCEPTION_REGISTRATION;\r\n+}\sTCL_EXCEPTION_REGISTRATION;\r\n\s#endif\r\n\s\r\n\s/*\r\n@@\s-1086,7\s+1086,7\s@@\sTclWinCPUID(\r\n\s\r\n\s#\s\s\selse\r\n\s\r\n-\s\s\s\sEXCEPTION_REGISTRATION\sregistration;\r\n+\s\s\s\sTCL_EXCEPTION_REGISTRATION\sregistration;\r\n\s\r\n\s\s\s\s\s/*\r\n\s\s\s\s\s\s*\sExecute\sthe\sCPUID\sinstruction\swith\sthe\sgiven\sindex,\sand\sstore\sresults\r\n---\stclWinChan.c.orig\t2013-08-30\s17:58:40.000000000\s+0200\r\n+++\stclWinChan.c\t2013-11-08\s09:05:57.237807102\s+0100\r\n@@\s-127,14\s+127,14\s@@\sstatic\sTcl_ChannelType\sfileChannelType\s=\r\n\s\s*\sthem\sby\screating\san\sEXCEPTION_REGISTRATION\swithin\sthe\sactivation\srecord.\r\n\s\s*/\r\n\s\r\n-typedef\sstruct\sEXCEPTION_REGISTRATION\s{\r\n-\s\s\s\sstruct\sEXCEPTION_REGISTRATION*\slink;\r\n+typedef\sstruct\sTCL_EXCEPTION_REGISTRATION\s{\r\n+\s\s\s\sstruct\sTCL_EXCEPTION_REGISTRATION\s*link;\r\n\s\s\s\s\sEXCEPTION_DISPOSITION\s(*handler)(\r\n\s\t\s\s\s\sstruct\s_EXCEPTION_RECORD*,\svoid*,\sstruct\s_CONTEXT*,\svoid*);\r\n\s\s\s\s\svoid*\sebp;\r\n\s\s\s\s\svoid*\sesp;\r\n\s\s\s\s\sint\sstatus;\r\n-}\sEXCEPTION_REGISTRATION;\r\n+}\sTCL_EXCEPTION_REGISTRATION;\r\n\s#endif\r\n\s\f\r\n\s/*\r\n@@\s-1027,7\s+1027,7\s@@\sTcl_MakeFileChannel(\r\n\s\t\t\t\t\s*\sTCL_WRITABLE\sto\sindicate\sfile\smode.\s*/\r\n\s{\r\n\s#if\sdefined(HAVE_NO_SEH)\s&&\s!defined(_WIN64)\r\n-\s\s\s\sEXCEPTION_REGISTRATION\sregistration;\r\n+\s\s\s\sTCL_EXCEPTION_REGISTRATION\sregistration;\r\n\s#endif\r\n\s\s\s\s\schar\schannelName[16\s+\sTCL_INTEGER_SPACE];\r\n\s\s\s\s\sTcl_Channel\schannel\s=\sNULL;\r\n---\stclWinFCmd.c.orig\t2013-08-30\s17:58:40.000000000\s+0200\r\n+++\stclWinFCmd.c\t2013-11-08\s09:09:19.541771741\s+0100\r\n@@\s-72,17\s+72,17\s@@\sCONST\sTclFileAttrProcs\stclpFileAttrProcs\r\n\s/*\r\n\s\s*\sUnlike\sBorland\sand\sMicrosoft,\swe\sdon't\sregister\sexception\shandlers\sby\r\n\s\s*\spushing\sregistration\srecords\sonto\sthe\sruntime\sstack.\sInstead,\swe\sregister\r\n-\s*\sthem\sby\screating\san\sEXCEPTION_REGISTRATION\swithin\sthe\sactivation\srecord.\r\n+\s*\sthem\sby\screating\san\sTCL_EXCEPTION_REGISTRATION\swithin\sthe\sactivation\srecord.\r\n\s\s*/\r\n\s\r\n-typedef\sstruct\sEXCEPTION_REGISTRATION\s{\r\n-\s\s\s\sstruct\sEXCEPTION_REGISTRATION\s*link;\r\n+typedef\sstruct\sTCL_EXCEPTION_REGISTRATION\s{\r\n+\s\s\s\sstruct\sTCL_EXCEPTION_REGISTRATION\s*link;\r\n\s\s\s\s\sEXCEPTION_DISPOSITION\s(*handler)(\r\n\s\t\s\s\s\sstruct\s_EXCEPTION_RECORD\s*,\svoid\s*,\sstruct\s_CONTEXT\s*,\svoid\s*);\r\n\s\s\s\s\svoid\s*ebp;\r\n\s\s\s\s\svoid\s*esp;\r\n\s\s\s\s\sint\sstatus;\r\n-}\sEXCEPTION_REGISTRATION;\r\n+}\sTCL_EXCEPTION_REGISTRATION;\r\n\s\r\n\s#endif\r\n\s\r\n@@\s-176,7\s+176,7\s@@\sDoRenameFile(\r\n\s\t\t\t\t\s*\s(native).\s*/\r\n\s{\r\n\s#if\sdefined(HAVE_NO_SEH)\s&&\s!defined(_WIN64)\r\n-\s\s\s\sEXCEPTION_REGISTRATION\sregistration;\r\n+\s\s\s\sTCL_EXCEPTION_REGISTRATION\sregistration;\r\n\s#endif\r\n\s\s\s\s\sDWORD\ssrcAttr,\sdstAttr;\r\n\s\s\s\s\sint\sretval\s=\s-1;\r\n@@\s-568,7\s+568,7\s@@\sDoCopyFile(\r\n\s\s\s\s\sCONST\sTCHAR\s*nativeDst)\t/*\sPathname\sof\sfile\sto\scopy\sto\s(native).\s*/\r\n\s{\r\n\s#if\sdefined(HAVE_NO_SEH)\s&&\s!defined(_WIN64)\r\n-\s\s\s\sEXCEPTION_REGISTRATION\sregistration;\r\n+\s\s\s\sTCL_EXCEPTION_REGISTRATION\sregistration;\r\n\s#endif\r\n\s\s\s\s\sint\sretval\s=\s-1;
J foundin 8.5.15
J is_private 0
J login anonymous
J priority 5\sMedium
J private_contact 98c5a4b8c6c847840eea2e9bf0d223f33d217646
J resolution None
J severity Important
J status Open
J submitter anonymous
J subsystem 53.\sConfigure\sand\sBuild\sTools
J title Tcl\scompile\serror\sfor\swin\sbuild
J type Bug
K 180810acbe76aefc43355afa956730d056d25a24
U anonymous
Z c38a5b6d3e293a9f8e25d3aef22cd49c
