Skip to content

Commit

Permalink
Merge pull request #125 from GaloisInc/qualified_list
Browse files Browse the repository at this point in the history
Qualify Data.List import to fix GHC 8.10 compatibility check.
  • Loading branch information
kquick authored Jan 19, 2021
2 parents 0aee352 + 3efc468 commit 13995d8
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions saw-core/src/Verifier/SAW/Name.hs
Original file line number Diff line number Diff line change
Expand Up @@ -52,7 +52,7 @@ module Verifier.SAW.Name
import Control.Exception (assert)
import Data.Char
import Data.Hashable
import Data.List
import qualified Data.List as L
import Data.List.NonEmpty (NonEmpty(..))
import Data.Map (Map)
import qualified Data.Map as Map
Expand Down Expand Up @@ -93,7 +93,7 @@ moduleNamePieces (ModuleName x) = Text.splitOn (Text.pack ".") x
mkModuleName :: [String] -> ModuleName
mkModuleName [] = error "internal: mkModuleName given empty module name"
mkModuleName nms = assert (all isCtor nms) $ ModuleName (Text.pack s)
where s = intercalate "." (reverse nms)
where s = L.intercalate "." (reverse nms)

preludeName :: ModuleName
preludeName = mkModuleName ["Prelude"]
Expand Down

0 comments on commit 13995d8

Please sign in to comment.