From b4d4a80e8b47237dbdbb5bbd5ceaab00306ebb77 Mon Sep 17 00:00:00 2001 From: sof Date: Mon, 25 Aug 1997 21:29:23 +0000 Subject: [PATCH] [project @ 1997-08-25 21:29:23 by sof] Removed the printing of foo: unchanged msgs; fixed up printing of hi-diffs --- ghc/driver/ghc-iface.lprl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/driver/ghc-iface.lprl b/ghc/driver/ghc-iface.lprl index 7f4cb66..ebd4778 100644 --- a/ghc/driver/ghc-iface.lprl +++ b/ghc/driver/ghc-iface.lprl @@ -302,13 +302,13 @@ sub printNewItemVersion { } elsif ($idecl ne $Decl{"old:$item"}) { # Old decl differs from new decl local($odecl) = $Decl{"old:$item"}; - if ($show_hi_diffs) {print STDERR "changed: $item\nOld: $odeclNew: $idecl";} + if ($show_hi_diffs) {print STDERR "changed: $item\nOld: $odecl", "New: $idecl";} print $hifile "--old: ", $OldVersion{"$item"}, " $odecl" if $Keep_HiDiffs; # show old in interface file print $hifile "$mod_version "; # Use module version } else { # Identical decls, so use old version number - if ($show_hi_diffs) {print STDERR "$item: unchanged\n";} + #if ($show_hi_diffs) {print STDERR "$item: unchanged\n";} print $hifile $OldVersion{"$item"}, " "; } return; -- 1.7.10.4