Skip to content

Commit 4e7fab9

Browse files
committed
Adapt to (~) becoming a type operator
`(~)` now requires `TypeOperators` in GHC 9.4 (see https://gitlab.haskell.org/ghc/ghc/-/wikis/migration/9.4?version_id=503a517b7238e8bac3dd588f32e234bf74b17097#-is-now-a-type-operator) to build without warnings.
1 parent 8079273 commit 4e7fab9

File tree

9 files changed

+9
-0
lines changed

9 files changed

+9
-0
lines changed

benchmarks/alongside.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
{-# LANGUAGE RankNTypes #-}
22
{-# LANGUAGE TypeFamilies #-}
3+
{-# LANGUAGE TypeOperators #-}
34
{-# LANGUAGE FlexibleInstances #-}
45
{-# LANGUAGE MultiParamTypeClasses #-}
56
module Main (main) where

src/Control/Lens/Each.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
{-# LANGUAGE CPP #-}
22
{-# LANGUAGE GADTs #-}
33
{-# LANGUAGE TypeFamilies #-}
4+
{-# LANGUAGE TypeOperators #-}
45
{-# LANGUAGE FlexibleContexts #-}
56
{-# LANGUAGE FlexibleInstances #-}
67
{-# LANGUAGE DefaultSignatures #-}

src/Control/Lens/Internal/Bazaar.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
{-# LANGUAGE CPP #-}
22
{-# LANGUAGE Rank2Types #-}
33
{-# LANGUAGE TypeFamilies #-}
4+
{-# LANGUAGE TypeOperators #-}
45
{-# LANGUAGE FlexibleInstances #-}
56
{-# LANGUAGE FunctionalDependencies #-}
67
{-# LANGUAGE RoleAnnotations #-}

src/Control/Lens/Internal/Context.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
{-# LANGUAGE Rank2Types #-}
22
{-# LANGUAGE TypeFamilies #-}
3+
{-# LANGUAGE TypeOperators #-}
34
{-# LANGUAGE FlexibleContexts #-}
45
{-# LANGUAGE FlexibleInstances #-}
56
{-# LANGUAGE FunctionalDependencies #-}

src/Control/Lens/Internal/Indexed.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
{-# LANGUAGE CPP #-}
22
{-# LANGUAGE Rank2Types #-}
33
{-# LANGUAGE TypeFamilies #-}
4+
{-# LANGUAGE TypeOperators #-}
45
{-# LANGUAGE FlexibleContexts #-}
56
{-# LANGUAGE FlexibleInstances #-}
67
{-# LANGUAGE ScopedTypeVariables #-}

src/Control/Lens/Internal/Magma.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@
55
{-# LANGUAGE ScopedTypeVariables #-}
66
{-# LANGUAGE UndecidableInstances #-}
77
{-# LANGUAGE TypeFamilies #-}
8+
{-# LANGUAGE TypeOperators #-}
89
{-# LANGUAGE MultiParamTypeClasses #-}
910
{-# LANGUAGE RoleAnnotations #-}
1011
-----------------------------------------------------------------------------

src/Control/Lens/Zoom.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
{-# LANGUAGE CPP #-}
22
{-# LANGUAGE TypeFamilies #-}
3+
{-# LANGUAGE TypeOperators #-}
34
{-# LANGUAGE FlexibleContexts #-}
45
{-# LANGUAGE FlexibleInstances #-}
56
{-# LANGUAGE UndecidableInstances #-}

tests/T917.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@
55
{-# LANGUAGE PolyKinds #-}
66
{-# LANGUAGE TemplateHaskell #-}
77
{-# LANGUAGE TypeFamilies #-}
8+
{-# LANGUAGE TypeOperators #-}
89

910
#if __GLASGOW_HASKELL__ < 806
1011
{-# LANGUAGE TypeInType #-}

tests/templates.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4,6 +4,7 @@
44
{-# LANGUAGE FunctionalDependencies #-}
55
{-# LANGUAGE FlexibleInstances #-}
66
{-# LANGUAGE TypeFamilies #-}
7+
{-# LANGUAGE TypeOperators #-}
78
{-# LANGUAGE Rank2Types #-}
89
{-# LANGUAGE GADTs #-}
910
{-# LANGUAGE UndecidableInstances #-}

0 commit comments

Comments
 (0)