git.iko.soy/elk
on master help sign in
Remove dead code in Reporting.Error.Canonicalize
0fb0978Evan Czaplicki
src/Reporting/Error/Canonicalize.hs+1−7
compare with master
unifiedsplit
@@ -3,7 +3,7 @@ module Reporting.Error.Canonicalize where
3
3
4import Control.Arrow (second)
4import Control.Arrow (second)
5import qualified Data.Char as Char
5import qualified Data.Char as Char
6−import Text.PrettyPrint.ANSI.Leijen (Doc, dullyellow, fillSep, indent, text, vcat)
6+import Text.PrettyPrint.ANSI.Leijen (Doc, dullyellow, fillSep, indent, text)
7
7
8import qualified AST.Expression.Canonical as Canonical
8import qualified AST.Expression.Canonical as Canonical
9import qualified AST.Module.Name as ModuleName
9import qualified AST.Module.Name as ModuleName
@@ -377,12 +377,6 @@ badMutualRecursion region name names =
377 let
377 let
378 header =
378 header =
379 Help.functionName name ++ " is defined in terms of itself in a sneaky way, causing an infinite loop."
379 Help.functionName name ++ " is defined in terms of itself in a sneaky way, causing an infinite loop."
380−
381− otherDefs =
382− if length names == 1 then
383− "one other definition"
384− else
385− show (length names) ++ " other definitions"
386 in
380 in
387 Report.report "BAD RECURSION" (Just region) header $
381 Report.report "BAD RECURSION" (Just region) header $
388 Help.stack
382 Help.stack