From ee5903fe3e57b68e4ceb3462eab02b31eb0d1fb7 Mon Sep 17 00:00:00 2001
From: Pierre Muller <pierre@freepascal.org>
Date: Sat, 26 Apr 2025 22:16:42 +0000
Subject: [PATCH] Use same order in writeppu and getppucrc to get same output
 in debug files

---
 compiler/fppu.pas | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/compiler/fppu.pas b/compiler/fppu.pas
index 8291cf55e4..ba23b6a5e1 100644
--- a/compiler/fppu.pas
+++ b/compiler/fppu.pas
@@ -1854,19 +1854,20 @@ var
          Writeln(ppufile.CRCFile,'CRC of getppucrc of ',ppufilename,
                  ' defsgeneration=',defsgeneration);
 {$endif def Test_Double_checksum_write}
+         { extra header (sub version, module flags) }
+         writeextraheader;
+
          { first the (JVM) namespace }
          if assigned(namespace) then
            begin
              ppufile.putstring(namespace^);
              ppufile.writeentry(ibjvmnamespace);
            end;
+
          { the unitname }
          ppufile.putstring(realmodulename^);
          ppufile.writeentry(ibmodulename);
 
-         { extra header (sub version, module flags) }
-         writeextraheader;
-
          ppufile.putset(tppuset1(moduleoptions));
          if mo_has_deprecated_msg in moduleoptions then
            ppufile.putstring(deprecatedmsg^);