diff --git a/ghc-tagged.changes b/ghc-tagged.changes
index 628c895..b6098fd 100644
--- a/ghc-tagged.changes
+++ b/ghc-tagged.changes
@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Thu Oct 17 12:20:00 UTC 2020 - Ondřej Súkup <mimi.vx@gmail.com>
+ 
+- force i686 arch on i586
+ 
 -------------------------------------------------------------------
 Tue Oct  6 08:56:30 UTC 2020 - psimons@suse.com
 
diff --git a/ghc-tagged.spec b/ghc-tagged.spec
index 6092f69..cbb2e92 100644
--- a/ghc-tagged.spec
+++ b/ghc-tagged.spec
@@ -30,6 +30,12 @@ BuildRequires:  ghc-deepseq-devel
 BuildRequires:  ghc-rpm-macros
 BuildRequires:  ghc-template-haskell-devel
 BuildRequires:  ghc-transformers-devel
+# GHC dont support i586
+%ifarch %{ix86}
+ExclusiveArch:  i586 i686
+ExclusiveArch:  i686
+%{expand:%%global optflags %(echo "%{optflags}"|sed -e s/i586/i686/) -march=i686 -mtune=generic}
+%endif
 
 %description
 Haskell 98 phantom types to avoid unsafely passing dummy arguments.