diff --git a/haddock-api/src/Haddock/Types.hs b/haddock-api/src/Haddock/Types.hs index 273e08ae7c010ae8e6b36a5cdcc1781c9a460d1b..1fe9f71a75b276fa0cd95324f17e11917ae685cb 100644 --- a/haddock-api/src/Haddock/Types.hs +++ b/haddock-api/src/Haddock/Types.hs @@ -1049,7 +1049,7 @@ instance NFData EpaCommentTok where rnf (EpaDocOptions s) = rnf s rnf (EpaLineComment s) = rnf s rnf (EpaBlockComment s) = rnf s - rnf EpaEofComment = () + -- rnf (EpaCppIgnored s) = rnf s instance NFData a => NFData (Strict.Maybe a) where @@ -1072,4 +1072,3 @@ instance NFData AnchorOperation where instance NFData DeltaPos where rnf (SameLine n) = rnf n rnf (DifferentLine n m) = n `deepseq` m `deepseq` () -