From b2f23f86c83dd1a2b63872146d61760c4a974242 Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 10 Apr 2000 13:59:17 +0000 Subject: [PATCH] [project @ 2000-04-10 13:59:17 by simonmar] Text => Show --- ghc/compiler/absCSyn/Costs.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/absCSyn/Costs.lhs b/ghc/compiler/absCSyn/Costs.lhs index f3aee78..6befe2e 100644 --- a/ghc/compiler/absCSyn/Costs.lhs +++ b/ghc/compiler/absCSyn/Costs.lhs @@ -1,7 +1,7 @@ % % (c) The GRASP/AQUA Project, Glasgow University, 1992-1998 % -% $Id: Costs.lhs,v 1.21 2000/03/23 17:45:17 simonpj Exp $ +% $Id: Costs.lhs,v 1.22 2000/04/10 13:59:17 simonmar Exp $ % % Only needed in a GranSim setup -- HWL % --------------------------------------------------------------------------- @@ -67,7 +67,7 @@ import Panic ( trace ) -- -------------------------------------------------------------------------- data CostRes = Cost (Int, Int, Int, Int, Int) - deriving (Text) + deriving (Show) nullCosts = Cost (0, 0, 0, 0, 0) :: CostRes initHdrCosts = Cost (2, 0, 0, 1, 0) :: CostRes -- 1.7.10.4