[Git][ghc/ghc][master] Fix typo in `Opt_WriteIfSimplifiedCore`'s name

Marge Bot (@marge-bot) gitlab at gitlab.haskell.org
Wed Oct 19 14:50:08 UTC 2022



Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC


Commits:
1dab1167 by Gergő Érdi at 2022-10-19T10:49:51-04:00
Fix typo in `Opt_WriteIfSimplifiedCore`'s name

- - - - -


4 changed files:

- compiler/GHC/Driver/Flags.hs
- compiler/GHC/Driver/Main.hs
- compiler/GHC/Driver/Session.hs
- compiler/GHC/Iface/Make.hs


Changes:

=====================================
compiler/GHC/Driver/Flags.hs
=====================================
@@ -446,7 +446,7 @@ data GeneralFlag
    | Opt_KeepOFiles
 
    | Opt_BuildDynamicToo
-   | Opt_WriteIfSimplifedCore
+   | Opt_WriteIfSimplifiedCore
    | Opt_UseBytecodeRatherThanObjects
 
    -- safe haskell flags


=====================================
compiler/GHC/Driver/Main.hs
=====================================
@@ -1110,7 +1110,7 @@ hscDesugarAndSimplify summary (FrontendTypecheck tc_result) tc_warnings mb_old_h
                              hscs_old_iface_hash = mb_old_hash
                            }
 
-      Just desugared_guts | gopt Opt_WriteIfSimplifedCore dflags -> do
+      Just desugared_guts | gopt Opt_WriteIfSimplifiedCore dflags -> do
           -- If -fno-code is enabled (hence we fall through to this case)
           -- Running the simplifier once is necessary before doing byte code generation
           -- in order to inline data con wrappers but we honour whatever level of simplificication the


=====================================
compiler/GHC/Driver/Session.hs
=====================================
@@ -3481,7 +3481,7 @@ fFlagsDeps = [
   flagSpec "strictness"                       Opt_Strictness,
   flagSpec "use-rpaths"                       Opt_RPath,
   flagSpec "write-interface"                  Opt_WriteInterface,
-  flagSpec "write-if-simplfied-core"          Opt_WriteIfSimplifedCore,
+  flagSpec "write-if-simplfied-core"          Opt_WriteIfSimplifiedCore,
   flagSpec "write-ide-info"                   Opt_WriteHie,
   flagSpec "unbox-small-strict-fields"        Opt_UnboxSmallStrictFields,
   flagSpec "unbox-strict-fields"              Opt_UnboxStrictFields,
@@ -3878,8 +3878,8 @@ impliedGFlags = [(Opt_DeferTypeErrors, turnOn, Opt_DeferTypedHoles)
                 ,(Opt_DeferTypeErrors, turnOn, Opt_DeferOutOfScopeVariables)
                 ,(Opt_DoLinearCoreLinting, turnOn, Opt_DoCoreLinting)
                 ,(Opt_Strictness, turnOn, Opt_WorkerWrapper)
-                ,(Opt_WriteIfSimplifedCore, turnOn, Opt_WriteInterface)
-                ,(Opt_ByteCodeAndObjectCode, turnOn, Opt_WriteIfSimplifedCore)
+                ,(Opt_WriteIfSimplifiedCore, turnOn, Opt_WriteInterface)
+                ,(Opt_ByteCodeAndObjectCode, turnOn, Opt_WriteIfSimplifiedCore)
                 ] ++ validHoleFitsImpliedGFlags
 
 -- General flags that are switched on/off when other general flags are switched


=====================================
compiler/GHC/Iface/Make.hs
=====================================
@@ -280,8 +280,8 @@ mkIface_ hsc_env
         entities = typeEnvElts type_env
         show_linear_types = xopt LangExt.LinearTypes (hsc_dflags hsc_env)
 
-        extra_decls = if gopt Opt_WriteIfSimplifedCore dflags then Just [ toIfaceTopBind b | b <- core_prog ]
-                                                           else Nothing
+        extra_decls = if gopt Opt_WriteIfSimplifiedCore dflags then Just [ toIfaceTopBind b | b <- core_prog ]
+                                                               else Nothing
         decls  = [ tyThingToIfaceDecl show_linear_types entity
                  | entity <- entities,
                    let name = getName entity,



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/1dab116784e480ab277623e1bd8d78beadcbc433

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/1dab116784e480ab277623e1bd8d78beadcbc433
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20221019/06cc4f05/attachment-0001.html>


More information about the ghc-commits mailing list