From 906d0ba06ef076fa6bebc994e1145bf222449b47 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?K=C3=A1roly=20Balogh?= <karoly@freepascal.org>
Date: Wed, 19 May 2021 07:39:24 +0000
Subject: [PATCH] sinclairql: make sure the end of bss (hence the bss size) is
 also aligned to two bytes

git-svn-id: trunk@49380 -
---
 compiler/systems/t_sinclairql.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/systems/t_sinclairql.pas b/compiler/systems/t_sinclairql.pas
index 2c8dee37ba..01947209a0 100644
--- a/compiler/systems/t_sinclairql.pas
+++ b/compiler/systems/t_sinclairql.pas
@@ -224,6 +224,7 @@ begin
       Add('  .bss (NOLOAD): {');
       Add('      _sbss = .;');
       Add('      *(.bss .bss.*)');
+      Add('      . = ALIGN(2); SHORT(0x0000);');
       Add('      _ebss = .;');
       Add('  } :'+ProgramHeaderName);
       Add('}');