Commit 29b2ecb

authored

Fix build for GHC 9.10.2 (#4644)

The constructor for `TypeEqMismatch` changed at 9.10.2 (not at 9.12 as I previously thought)

1 parent 5d221b9 commit 29b2ecbCopy full SHA for 29b2ecb

File tree

-2

lines changed

-2

lines changed

Lines changed: 2 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -104,7 +104,7 @@ _MismatchMessage _ report = pure report`
`104`	`104`
`105`	`105`	`-- \| Focus 'teq_mismatch_expected' from 'TypeEqMismatch'.`
`106`	`106`	`_TypeEqMismatchExpected :: Traversal' MismatchMsg Type`
`107`		`-#if MIN_VERSION_ghc(9,12,0)`
	`107`	`+#if MIN_VERSION_ghc(9,10,2)`
`108`	`108`	`_TypeEqMismatchExpected focus mismatch@(TypeEqMismatch _ _ _ expected _ _ _) =`
`109`	`109`	`(\expected' -> mismatch { teq_mismatch_expected = expected' }) <$> focus expected`
`110`	`110`	`#else`
`@@ -115,7 +115,7 @@ _TypeEqMismatchExpected _ mismatch = pure mismatch`
`115`	`115`
`116`	`116`	`-- \| Focus 'teq_mismatch_actual' from 'TypeEqMismatch'.`
`117`	`117`	`_TypeEqMismatchActual :: Traversal' MismatchMsg Type`
`118`		`-#if MIN_VERSION_ghc(9,12,0)`
	`118`	`+#if MIN_VERSION_ghc(9,10,2)`
`119`	`119`	`_TypeEqMismatchActual focus mismatch@(TypeEqMismatch _ _ _ _ actual _ _) =`
`120`	`120`	`(\actual' -> mismatch { teq_mismatch_actual = actual' }) <$> focus actual`
`121`	`121`	`#else`

Comments

(0)