From f51a893d1dc17579e99157bc5e8c8b91e9b38825 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 28 Mar 2020 15:47:45 +0000
Subject: [PATCH]   * Xtensa: align literals properly

git-svn-id: trunk@44382 -
---
 compiler/xtensa/hlcgcpu.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/compiler/xtensa/hlcgcpu.pas b/compiler/xtensa/hlcgcpu.pas
index 53fa694361..dc3cd4636c 100644
--- a/compiler/xtensa/hlcgcpu.pas
+++ b/compiler/xtensa/hlcgcpu.pas
@@ -75,7 +75,10 @@ implementation
       { Xtensa needs the data before the subroutine }
       if assigned(data) and
          (not data.empty) then
-        current_asmdata.asmlists[alt].concatlist(data);
+        begin
+          data.Insert(tai_align.Create(4));
+          current_asmdata.asmlists[alt].concatlist(data);
+        end;
       inherited record_generated_code_for_procdef(pd,code,nil);
     end;