From 4680bc5660fd0623f4e12af8d4a3a06af25a78f5 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 8 Nov 2000 17:33:55 +0000
Subject: [PATCH] [project @ 2000-11-08 17:33:55 by simonmar] Fix a test that
 was backwards.  Now we get unfoldings in the iface files again.

---
 ghc/compiler/main/MkIface.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/main/MkIface.lhs b/ghc/compiler/main/MkIface.lhs
index 5ec45f18fec8..adf89db91481 100644
--- a/ghc/compiler/main/MkIface.lhs
+++ b/ghc/compiler/main/MkIface.lhs
@@ -447,7 +447,7 @@ mkFinalId codegen_ids is_rec id rhs
     bottoming_fn   = isBottomingStrictness (strictnessInfo core_idinfo)
 
     unfolding    = mkTopUnfolding rhs
-    rhs_is_small = neverUnfold unfolding
+    rhs_is_small = not (neverUnfold unfolding)
 
     unfold_info | show_unfold = unfolding
 		| otherwise   = noUnfolding
-- 
GitLab