From 2e772cb94d225ad5663cedb34300f0799b4fa884 Mon Sep 17 00:00:00 2001
From: Raymond Hettinger <raymond.hettinger@gmail.com>
Date: Sat, 7 Jan 2023 00:24:30 -0600
Subject: [PATCH] Add in the large component first.

---
 Modules/mathmodule.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Modules/mathmodule.c b/Modules/mathmodule.c
index b2588b478fdff3..0bcb336efbb03a 100644
--- a/Modules/mathmodule.c
+++ b/Modules/mathmodule.c
@@ -2903,8 +2903,8 @@ static inline DoubleLength
 dl_fma(DoubleLength total, double p, double q)
 {
     DoubleLength product = dl_mul(p, q);
-    total = dl_add(total, product.lo);
-    return  dl_add(total, product.hi);
+    total = dl_add(total, product.hi);
+    return  dl_add(total, product.lo);
 }
 
 static inline double