See https://gitlab.com/procps-ng/procps/-/issues/271

diff -u -r procps-ng-4.0.3.alt/src/tests/test_strtod_nol.c procps-ng-4.0.3/src/tests/test_strtod_nol.c
--- procps-ng-4.0.3.alt/src/tests/test_strtod_nol.c	2022-12-18 23:44:18.383960834 +0100
+++ procps-ng-4.0.3/src/tests/test_strtod_nol.c	2023-03-20 16:52:26.680032658 +0100
@@ -1,6 +1,7 @@
 
 #include <stdio.h>
 #include <stdlib.h>
+#include <math.h>
 #include "strutils.h"
 
 struct strtod_tests {
@@ -25,6 +26,11 @@
     {NULL, 0.0}
 };
 
+#define EPSILON 1.0  // Really not trying for precision here
+int dequal(const double d1, const double d2)
+{
+    return fabs(d1-d2) < EPSILON;
+}
 
 
 int main(int argc, char *argv[])
@@ -33,8 +39,8 @@
     double val;
 
     for(i=0; tests[i].string != NULL; i++) {
-        if(strtod_nol_or_err(tests[i].string, "Cannot parse number") !=
-           tests[i].result) {
+        if(!dequal (strtod_nol_or_err(tests[i].string, "Cannot parse number"),
+                    tests[i].result)) {
             fprintf(stderr, "FAIL: strtod_nol_or_err(\"%s\") != %f\n",
                     tests[i].string, tests[i].result);
             return EXIT_FAILURE;
ref='/guix/refs/?id=738c0d96215325419872dea92042c9106bddb03a'>refs</a><a class='active' href='/guix/log/gnu/packages/mingw.scm?showmsg=1'>log</a><a href='/guix/tree/gnu/packages/mingw.scm?id=738c0d96215325419872dea92042c9106bddb03a'>tree</a><a href='/guix/commit/gnu/packages/mingw.scm?id=738c0d96215325419872dea92042c9106bddb03a'>commit</a><a href='/guix/diff/gnu/packages/mingw.scm?id=738c0d96215325419872dea92042c9106bddb03a'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/mingw.scm'>
<input type='hidden' name='id' value='738c0d96215325419872dea92042c9106bddb03a'/><input type='hidden' name='showmsg' value='1'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=738c0d96215325419872dea92042c9106bddb03a&amp;showmsg=1'>root</a>/<a href='/guix/log/gnu?id=738c0d96215325419872dea92042c9106bddb03a&amp;showmsg=1'>gnu</a>/<a href='/guix/log/gnu/packages?id=738c0d96215325419872dea92042c9106bddb03a&amp;showmsg=1'>packages</a>/<a href='/guix/log/gnu/packages/mingw.scm?id=738c0d96215325419872dea92042c9106bddb03a&amp;showmsg=1'>mingw.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/mingw.scm?id=738c0d96215325419872dea92042c9106bddb03a'>Collapse</a>)</th><th class='left'>Author</th></tr>
<tr class='logheader'><td><span title='2020-04-04 16:23:07 -0400'>2020-04-04</span></td><td class='logsubject'><a href='/guix/commit/gnu/packages/mingw.scm?id=4719b715726303d680cd6f65caad96bfa194cda6'>gnu: mingw: Add mingw-w64 reproducibility patches.</a></td><td>Carl Dong</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
These patches were originally found at the debian mingw-w64 team's
mingw-w64 repo, and should improve the reproducibility of our mingw-w64
toolchain.

* gnu/packages/patches/mingw-w64-dlltool-temp-prefix.patch: New file.
* gnu/packages/patches/mingw-w64-reproducible-gendef.patch: New file.
* gnu/local.mk (dist_patch_DATA): Update accordingly.
* gnu/packages/mingw.scm (make-mingw-w64): Apply patches.


</td></tr>
<tr class='logheader'><td><span title='2020-03-12 15:45:28 -0400'>2020-03-12</span></td><td class='logsubject'><a href='/guix/commit/gnu/packages/mingw.scm?id=0f864175dcfa23562744630cb3313de583856a66'>gnu: mingw-w64-*: Update to 7.0.0.</a></td><td>Carl Dong</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
* gnu/packages/mingw.scm (make-mingw-w64): Update to 7.0.0.


</td></tr>