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;
e35d2'>refs</a><a class='active' href='/guix/log/gnu/installer/final.scm'>log</a><a href='/guix/tree/gnu/installer/final.scm?id=56c6466887a3fdca0bc407418f807448a58e35d2'>tree</a><a href='/guix/commit/gnu/installer/final.scm?id=56c6466887a3fdca0bc407418f807448a58e35d2'>commit</a><a href='/guix/diff/gnu/installer/final.scm?id=56c6466887a3fdca0bc407418f807448a58e35d2'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/installer/final.scm'>
<input type='hidden' name='id' value='56c6466887a3fdca0bc407418f807448a58e35d2'/><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=56c6466887a3fdca0bc407418f807448a58e35d2'>root</a>/<a href='/guix/log/gnu?id=56c6466887a3fdca0bc407418f807448a58e35d2'>gnu</a>/<a href='/guix/log/gnu/installer?id=56c6466887a3fdca0bc407418f807448a58e35d2'>installer</a>/<a href='/guix/log/gnu/installer/final.scm?id=56c6466887a3fdca0bc407418<tr><td><span title='2020-10-23 12:57:20 -0400'>2020-10-23</span></td><td><a href='/guix/commit/HACKING?id=73faee9fb25465f1b236f5f94e1052145655736f'>doc: Fix typo in HACKING.</a><span class='msg-avail'>...<span class='msg-tooltip'>* HACKING (Contributing): s/informations/information/.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2020-01-09 23:33:04 +0100'>2020-01-09</span></td><td><a href='/guix/commit/HACKING?id=2d315cd428484537e763d7f7c676dc5fff7995f6'>doc: Move "Commit Access" section from 'HACKING' to the manual.</a><span class='msg-avail'>...<span class='msg-tooltip'>* HACKING (Commit Access): Remove.
(Contributing): Update URL of the manual.
* doc/contributing.texi (Commit Access): New section.
(Submitting Patches): Add cross reference.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-01-09 23:33:04 +0100'>2020-01-09</span></td><td><a href='/guix/commit/HACKING?id=a7bde77d247ed0765f5378779d67b4668c5d7648'>doc: Add "Tracking Bugs and Patches" section.</a><span class='msg-avail'>...<span class='msg-tooltip'>* doc/contributing.texi (Tracking Bugs and Patches): New section.
(Submitting Patches): Refer to it.
* doc/guix.texi: Update copyright line.
* HACKING (Using emacs-debbugs): Remove.
</span></span></td><td>Ludovic Courtès</td></tr>
iguration): Cater for the
Hurd with %base-services/hurd, and with %base-packages/hurd that must always
be set.
(%system-services): Change to procedure.  When installing the the Hurd, do not
recommend `ntp-service-type' and USE `openssh-sans-x' package for
`openssh-service-type'.
(system-service-none): New variable.
* gnu/installer/newt/services.scm (run-network-management-page): Include it
when installing the Hurd.
(run-desktop-environments-cbt-page): When installing the Hurd, recommend to
not select any desktop enviroment.  Update users.
* gnu/installer/parted.scm (efi-installation?): Return #f when installing for
the Hurd.
(create-ext2-file-system): New procedure.
(user-fs-type-name, user-fs-type-&gt;mount-type, partition-filesystem-user-type,
format-user-partitions): Support `ext2'.
(&lt;user-partition&gt; partition-&gt;user-partition): Use `ext2' when installing the
Hurd.
(auto-partition!): Likewise.  No swap partition when installing the Hurd.
* gnu/installer/final.scm (install-system): Cater for cross installation of
the Hurd.
(bootloader-configuration): Use `grub-minimal-bootloader' when installing the
Hurd.
(user-partition-missing-modules): Cater for empty user-partitions.
(initrd-configuration, user-partitions-&gt;configuration): Cater for the Hurd.
* gnu/installer/steps.scm (format-configuration,
configuration-&gt;file): Cater for the Hurd.
* gnu/system/hurd.scm (%desktop-services/hurd): New variable.
* gnu/installer/tests.scm (choose-kernel): New procedure.
* gnu/tests/install.scm (gui-test-program): Use it.

Change-Id: Ifafb27b8a2f933944c77223a27ec151757237e36
</span></span></td><td>Janneke Nieuwenhuizen</td></tr>