commit:     ae744957e02b596105fbc0f85ba920f6a88a8bfc
Author:     Alfredo Tupone <tupone <AT> gentoo <DOT> org>
AuthorDate: Thu Feb 26 22:30:41 2026 +0000
Commit:     Alfredo Tupone <tupone <AT> gentoo <DOT> org>
CommitDate: Thu Feb 26 22:31:27 2026 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=ae744957

dev-tcltk/tcllib: fix random test

Closes: https://bugs.gentoo.org/947160
Signed-off-by: Alfredo Tupone <tupone <AT> gentoo.org>

 dev-tcltk/tcllib/files/tcllib-2.0-stddev.patch | 11 +++++++++++
 dev-tcltk/tcllib/tcllib-2.0.ebuild             |  7 +++++--
 2 files changed, 16 insertions(+), 2 deletions(-)

diff --git a/dev-tcltk/tcllib/files/tcllib-2.0-stddev.patch 
b/dev-tcltk/tcllib/files/tcllib-2.0-stddev.patch
new file mode 100644
index 000000000000..3441883a2931
--- /dev/null
+++ b/dev-tcltk/tcllib/files/tcllib-2.0-stddev.patch
@@ -0,0 +1,11 @@
+--- a/modules/simulation/random.test   2026-02-26 23:07:06.436861304 +0100
++++ b/modules/simulation/random.test   2026-02-26 23:12:52.124392444 +0100
+@@ -167,7 +167,7 @@
+         set stdev [expr {$stdev + $rnd * $rnd}]
+     }
+     set mean  [expr {$mean  / 1000.0}]
+-    set stdev [expr {sqrt($stdev / 1000.0)}]
++    set stdev [expr {sqrt($stdev / 1000.0 - $mean * $mean)}]
+ 
+     #
+     # We use a rough estimate for the deviation in the mean and stdev

diff --git a/dev-tcltk/tcllib/tcllib-2.0.ebuild 
b/dev-tcltk/tcllib/tcllib-2.0.ebuild
index 0831ad893d1f..940673a60b02 100644
--- a/dev-tcltk/tcllib/tcllib-2.0.ebuild
+++ b/dev-tcltk/tcllib/tcllib-2.0.ebuild
@@ -1,4 +1,4 @@
-# Copyright 1999-2024 Gentoo Authors
+# Copyright 1999-2026 Gentoo Authors
 # Distributed under the terms of the GNU General Public License v2
 
 EAPI=8
@@ -28,7 +28,10 @@ DOCS=(
 )
 HTML_DOCS=( idoc/www )
 
-PATCHES=( "${FILESDIR}"/${P}-test.patch )
+PATCHES=(
+       "${FILESDIR}"/${P}-test.patch
+       "${FILESDIR}"/${P}-stddev.patch
+)
 
 src_prepare() {
        default

Reply via email to