Skip to content

Commit

Permalink
ormolu
Browse files Browse the repository at this point in the history
  • Loading branch information
janmasrovira committed Apr 16, 2024
1 parent 1d9cb2d commit 2ceea69
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions app/Commands/Compile/CommonOptions.hs
Original file line number Diff line number Diff line change
Expand Up @@ -28,11 +28,11 @@ applyCompileCommonOptions opts e =
_entryPointOptimizationLevel = fromMaybe defaultOptimization (opts ^. compileOptimizationLevel),
_entryPointInliningDepth = opts ^. compileInliningDepth
}
where
defaultOptimization :: Int
defaultOptimization
| opts ^. compileDebug = 0
| otherwise = defaultOptimizationLevel
where
defaultOptimization :: Int
defaultOptimization
| opts ^. compileDebug = 0
| otherwise = defaultOptimizationLevel

fromCompileCommonOptionsMain :: (Members '[App] r) => CompileCommonOptionsMain -> Sem r CompileCommonOptions
fromCompileCommonOptionsMain = traverseOf compileInputFile getMainAppFile
Expand Down

0 comments on commit 2ceea69

Please sign in to comment.