Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix indentation

Browse source
This commit is contained in:
Martin Fredin 2023-02-18 13:27:58 +01:00
parent ad615cc9d8
commit 21fb6bf5ed
1 changed files with 21 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/Renamer.hs
View file

@ -40,7 +40,6 @@ renameLocalBind old_names (Bind name t _ parms rhs) = do
renameExp :: Names -> Exp -> Rn (Names, Exp) renameExp :: Names -> Exp -> Rn (Names, Exp)
renameExp old_names = \case renameExp old_names = \case
EId n -> pure (old_names, EId . fromMaybe n $ Map.lookup n old_names) EId n -> pure (old_names, EId . fromMaybe n $ Map.lookup n old_names)
EInt i1 -> pure (old_names, EInt i1) EInt i1 -> pure (old_names, EInt i1)