Commit 7e59d792 authored by Simon Marlow's avatar Simon Marlow
Browse files

remove tabs

parent d4ebfcce
...@@ -990,7 +990,7 @@ varid span buf len = ...@@ -990,7 +990,7 @@ varid span buf len =
Just ITlam -> ITlcase Just ITlam -> ITlcase
_ -> ITcase _ -> ITcase
else else
return ITcase return ITcase
maybe_layout keyword maybe_layout keyword
return $ L span keyword return $ L span keyword
Just (keyword, 0) -> do Just (keyword, 0) -> do
...@@ -999,8 +999,8 @@ varid span buf len = ...@@ -999,8 +999,8 @@ varid span buf len =
Just (keyword, exts) -> do Just (keyword, exts) -> do
extsEnabled <- extension $ \i -> exts .&. i /= 0 extsEnabled <- extension $ \i -> exts .&. i /= 0
if extsEnabled if extsEnabled
then do then do
maybe_layout keyword maybe_layout keyword
return $ L span keyword return $ L span keyword
else else
return $ L span $ ITvarid fs return $ L span $ ITvarid fs
......
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