Fix the definitions of trueName and falseName
authorIan Lynagh <igloo@earth.li>
Wed, 12 Nov 2008 13:56:45 +0000 (13:56 +0000)
committerIan Lynagh <igloo@earth.li>
Wed, 12 Nov 2008 13:56:45 +0000 (13:56 +0000)
Language/Haskell/TH/Syntax.hs

index dad7c10..7bba9ab 100644 (file)
@@ -261,8 +261,8 @@ instance (Lift a, Lift b, Lift c, Lift d, Lift e, Lift f, Lift g)
 
 
 trueName, falseName :: Name
-trueName  = mkNameG DataName "base" "GHC.Base" "True"
-falseName = mkNameG DataName "base" "GHC.Base" "False"
+trueName  = mkNameG DataName "ghc-prim" "GHC.Bool" "True"
+falseName = mkNameG DataName "ghc-prim" "GHC.Bool" "False"
 
 nothingName, justName :: Name
 nothingName = mkNameG DataName "base" "Data.Maybe" "Nothing"