Commit 59d75a24 authored by Jan Rasmus Tikovsky 's avatar Jan Rasmus Tikovsky
Browse files

Added additional case for unary minus

parent dac70ef7
......@@ -152,6 +152,7 @@ setQualified b (Function u _ f) = Function u b f
setQualified b (Identifier u _ i) = Identifier u b i
setQualified b (TypeCons u _ t) = TypeCons u b t
setQualified _ m@(ModuleName _) = m
setQualified _ s@(Symbol _) = s
setQualified _ c = internalError $ "Html.SyntaxColoring.setQualified: " ++ show c
code2string :: Code -> String
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment