Accepting request 1274996 from devel:languages:tcl

Automatic submission by obs-autosubmit

OBS-URL: https://build.opensuse.org/request/show/1274996
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/tcl?expand=0&rev=73

tcl-fix-socket-13.1.patch

@@ -0,0 +1,22 @@
+--- tests/socket.test	2025-04-29 17:37:07.745683933 +0200
++++ tests/socket.test	2025-04-29 17:26:42.669773969 +0200
+@@ -1809,7 +1809,7 @@
+ 
+ test socket_$af-13.1 {Testing use of shared socket between two threads} -body {
+     # create a thread
+-    set serverthread [thread::create -preserved [string map [list @localhost@ $localhost] {
++    set serverthread [thread::create -joinable [string map [list @localhost@ $localhost] {
+         set f [socket -server accept -myaddr @localhost@ 0]
+         set listen [lindex [fconfigure $f -sockname] 2]
+         proc accept {s a p} {
+@@ -1840,7 +1840,7 @@
+         gets $s result
+     }
+     close $s
+-    thread::release $serverthread
++    thread::join $serverthread
+     append result " " [llength [thread::names]]
+ } -result {hello 1} -constraints [list socket supported_$af thread]
+ 
+Index: tests/socket.test
+==================================================================

tcl.changes

@@ -1,3 +1,21 @@
+-------------------------------------------------------------------
+Tue Apr 29 15:46:07 UTC 2025 - Reinhard Max <max@suse.com>
+
+- Add tcl-fix-socket-13.1.patch to avoid a race condition in the
+  socket-13.1 test.
+
+-------------------------------------------------------------------
+Mon Apr  7 13:41:54 UTC 2025 - Reinhard Max <max@suse.com>
+
+- Version 8.6.16:
+  * [02d5d6] unneeded path normalization
+  * [cfdf80] zlib stream returns negative checksums
+  * [2c237b] regression in tzdata, %z instead of offset TZ-name
+  * [43c94f] Tcl will not start properly if there is an init.tcl 
+    file in the current dir
+  * [f2b5f8] clock scan of leapsecond: wrong result
+  * [0b809c] Segfault in TclOO with coroutines
+
 -------------------------------------------------------------------
 Tue Sep 24 09:15:58 UTC 2024 - Reinhard Max <max@suse.com>
 

tcl.spec

@@ -1,7 +1,7 @@
 #
 # spec file for package tcl
 #
-# Copyright (c) 2024 SUSE LLC
+# Copyright (c) 2025 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -22,11 +22,11 @@
 
 Name:           tcl
 URL:            http://www.tcl.tk
-Version:        8.6.15
+Version:        8.6.16
 Release:        0
 %define         rrc %{nil}
 %define TCL_MINOR %(echo %version | cut -c1-3)
-%define itclver 4.3.0
+%define itclver 4.3.2
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 Summary:        The Tcl Programming Language
 License:        TCL
@@ -48,6 +48,7 @@ Source0:        http://prdownloads.sourceforge.net/tcl/%{name}%{version}%{rrc}-s
 Source1:        tcl-rpmlintrc
 Source2:        baselibs.conf
 Source3:        macros.tcl
+Patch0:         tcl-fix-socket-13.1.patch
 BuildRequires:  autoconf
 BuildRequires:  pkg-config
 BuildRequires:  zlib-devel
@@ -87,6 +88,7 @@ the Tcl language itself.
 
 %prep
 %setup -q -n %name%version
+%patch -P 0
 if ! test -d pkgs/itcl%itclver; then
    : New itcl version: pkgs/itcl* . Please update the %%itclver macro acordingly.
    exit 1

tcl8.6.16-src.tar.gz

@@ -0,0 +1,3 @@
+version https://git-lfs.github.com/spec/v1
+oid sha256:91cb8fa61771c63c262efb553059b7c7ad6757afa5857af6265e4b0bdc2a14a5
+size 11678979