From: simonpj Date: Thu, 12 Feb 2004 14:31:39 +0000 (+0000) Subject: [project @ 2004-02-12 14:31:39 by simonpj] X-Git-Tag: Approx_11550_changesets_converted~88 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=4e4f2add26cad9bf7adcf99e6f90a26a5205fc04;p=ghc-hetmet.git [project @ 2004-02-12 14:31:39 by simonpj] Layout only --- diff --git a/ghc/compiler/types/InstEnv.lhs b/ghc/compiler/types/InstEnv.lhs index c197c05..cc75492 100644 --- a/ghc/compiler/types/InstEnv.lhs +++ b/ghc/compiler/types/InstEnv.lhs @@ -314,7 +314,7 @@ insert_overlapping new_item (item:items) -- Keep new one | old_beats_new = item : items -- Keep old one - | otherwise = item : insert_overlapping new_item items + | otherwise = item : insert_overlapping new_item items -- Keep both where new_beats_old = new_item `beats` item