Commit 49a97e97 authored by Edward Z. Yang's avatar Edward Z. Yang
Browse files

Fix reexported-modules display mangling.



sep allows for horizontal separation, which is absolutely
not what we want.  Use hcat instead.  Thanks @stepcut
for reporting.
Signed-off-by: default avatarEdward Z. Yang <ezyang@cs.stanford.edu>
parent 4c96e80d
......@@ -181,11 +181,11 @@ data ExposedModule
instance Text ExposedModule where
disp (ExposedModule m reexport) =
Disp.sep [ disp m
, case reexport of
Just m' -> Disp.sep [Disp.text "from", disp m']
Nothing -> Disp.empty
]
Disp.hsep [ disp m
, case reexport of
Just m' -> Disp.hsep [Disp.text "from", disp m']
Nothing -> Disp.empty
]
parse = do
m <- parseModuleNameQ
Parse.skipSpaces
......
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