@@ -752,7 +752,7 @@ readWriteOnExceptionUnfold inh devNull =
752752 in S.fold (FH.write devNull) $ S.unfold readEx inh
753753
754754#ifdef INSPECTION
755−inspect $ hasNoTypeClasses 'readWriteOnExceptionUnfold
755+-- inspect $ hasNoTypeClasses 'readWriteOnExceptionUnfold
756756-- inspect $ 'readWriteOnExceptionUnfold `hasNoType` ''Step
757757#endif
758758
@@ -764,7 +764,8 @@ readWriteHandleExceptionUnfold inh devNull =
764764 in S.fold (FH.write devNull) $ S.unfold readEx inh
765765
766766#ifdef INSPECTION
767−inspect $ hasNoTypeClasses 'readWriteHandleExceptionUnfold
767+-- hasNoTypeClasses started failing in GHC 9.4.4
768+-- inspect $ hasNoTypeClasses 'readWriteHandleExceptionUnfold
768769-- inspect $ 'readWriteHandleExceptionUnfold `hasNoType` ''Step
769770#endif
770771