diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2014-07-02 23:08:00 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2014-07-14 21:07:32 +0100 |
| commit | f6f4f54618cc27e7d9ed1a4cc110c6cb120454bc (patch) | |
| tree | cae9a5f1f9911a51260ab8ea3b20e5b85fa828d6 | |
| parent | c973c70a2147358e0f5489a2906723fd2ef3fc33 (diff) | |
| download | haskell-f6f4f54618cc27e7d9ed1a4cc110c6cb120454bc.tar.gz | |
White space only
| -rw-r--r-- | compiler/typecheck/TcTyDecls.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/typecheck/TcTyDecls.lhs b/compiler/typecheck/TcTyDecls.lhs index fcb8c0336c..262aa519b3 100644 --- a/compiler/typecheck/TcTyDecls.lhs +++ b/compiler/typecheck/TcTyDecls.lhs @@ -121,7 +121,7 @@ synTyConsOfType ty mkSynEdges :: [LTyClDecl Name] -> [(LTyClDecl Name, Name, [Name])] mkSynEdges syn_decls = [ (ldecl, name, nameSetToList fvs) | ldecl@(L _ (SynDecl { tcdLName = L _ name - , tcdFVs = fvs })) <- syn_decls ] + , tcdFVs = fvs })) <- syn_decls ] calcSynCycles :: [LTyClDecl Name] -> [SCC (LTyClDecl Name)] calcSynCycles = stronglyConnCompFromEdgedVertices . mkSynEdges |