X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FsimplStg%2FSRT.lhs;h=0081c95e0d61681e0aab93059fa01925c00bdb21;hb=7b1eed64afc271b35147e741dd24265c4774aca0;hp=eb3229f1962d674ed50fc1cb854474a2105de778;hpb=d5934bbb856aa0aa620c9b2e0fa51c90a1a5a048;p=ghc-hetmet.git diff --git a/compiler/simplStg/SRT.lhs b/compiler/simplStg/SRT.lhs index eb3229f..0081c95 100644 --- a/compiler/simplStg/SRT.lhs +++ b/compiler/simplStg/SRT.lhs @@ -15,9 +15,7 @@ import StgSyn import Id ( Id ) import VarSet import VarEnv -import Util ( sortLe ) -import Maybes ( orElse ) -import Maybes ( expectJust ) +import Maybes ( orElse, expectJust ) import Bitmap ( intsToBitmap ) #ifdef DEBUG @@ -27,7 +25,6 @@ import Outputable import List import Util -import Outputable \end{code} \begin{code}