Add support for GHC 9.2.2

con-kitty · Apr 7, 2022 · 949ced9 · 949ced9
1 parent 3e1fda3
commit 949ced9
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/satisfy/src/ConCat/Satisfy/Plugin.hs b/satisfy/src/ConCat/Satisfy/Plugin.hs
@@ -85,11 +85,13 @@ install _opts todos =
                             , sm_inline     = False -- important
                             , sm_eta_expand = False -- ??
                             , sm_case_case  = True
+#if MIN_VERSION_GLASGOW_HASKELL(9,2,2,0)
+                            , sm_cast_swizzle  = True
+#endif
 #if MIN_VERSION_GLASGOW_HASKELL(9,2,0,0)
                             , sm_uf_opts = defaultUnfoldingOpts
                             , sm_pre_inline = False
                             , sm_logger = logger
-
 #endif
 #if MIN_VERSION_GLASGOW_HASKELL(8,4,0,0)
                             , sm_dflags     = dflags

diff --git a/satisfy/src/ConCat/Simplify.hs b/satisfy/src/ConCat/Simplify.hs
@@ -125,6 +125,9 @@ simplEnvForCcc dflags inline logger
                            , sm_pre_inline = inline
                            , sm_logger = logger
                            , sm_dflags = dflags
+#if MIN_VERSION_GLASGOW_HASKELL(9,2,2,0)
+                           , sm_cast_swizzle = True
+#endif
                            }
   where
     rules_on      = gopt Opt_EnableRewriteRules   dflags