From 7f0885ba45df95553df85076b5953f58241b0221 Mon Sep 17 00:00:00 2001 From: simonpj Date: Fri, 12 Nov 1999 14:12:38 +0000 Subject: [PATCH] [project @ 1999-11-12 14:12:38 by simonpj] Modify to avoid warning message in test log --- ghc/tests/deSugar/should_run/dsrun003.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/tests/deSugar/should_run/dsrun003.hs b/ghc/tests/deSugar/should_run/dsrun003.hs index 7b92ed2..d100bff 100644 --- a/ghc/tests/deSugar/should_run/dsrun003.hs +++ b/ghc/tests/deSugar/should_run/dsrun003.hs @@ -9,5 +9,5 @@ data Person = Female {firstName, lastName :: String} isFemale (Female{}) = True isFemale (Male{}) = False -main = print (isFemale (Female {firstName = "Jane"})) +main = print (isFemale (Female {firstName = "Jane", lastName = "Smith"})) -- 1.7.10.4