[project @ 2005-01-31 15:48:21 by simonpj]
authorsimonpj <unknown>
Mon, 31 Jan 2005 15:48:22 +0000 (15:48 +0000)
committersimonpj <unknown>
Mon, 31 Jan 2005 15:48:22 +0000 (15:48 +0000)
---------------------------
Some Template Haskell fixes
---------------------------

* Tidy up conversion from TH.Name to RdrName.RdrName. It was partly
  duplicated between Convert.thRdrName and TcSplice.lookupThName.
  Now it's all in one place: Convert.thRdrName

* Fix a bug in TH.tupleTypeName/TH.tupleDataName (GHC.Tuple -> Data.Tuple)

* Export appEs from Language.Haskell.TH

libraries/template-haskell/Language/Haskell/TH.hs
libraries/template-haskell/Language/Haskell/TH/Syntax.hs

index 920bd4d..16ef073 100644 (file)
@@ -35,7 +35,7 @@ module Language.Haskell.TH(
        fromR, fromThenR, fromToR, fromThenToR, 
        normalB, guardedB, normalG, normalGE, patG, patGE, match, clause, 
        dyn, global, varE, conE, litE, appE, infixE, infixApp, sectionL, sectionR, 
-       lamE, lam1E, tupE, condE, letE, caseE, doE, compE, arithSeqE, 
+       lamE, lam1E, tupE, condE, letE, caseE, doE, compE, arithSeqE, appsE,
        fromE, fromThenE, fromToE, fromThenToE,
        listE, sigE, recConE, recUpdE, stringE, fieldExp,
        valD, funD, tySynD, dataD, newtypeD, classD, instanceD, sigD, forImpD,
index 8626332..144f727 100644 (file)
@@ -409,7 +409,7 @@ mk_tup_name n_commas space
   = Name occ (NameG space tup_mod)
   where
     occ = mkOccName ('(' : replicate n_commas ',' ++ ")")
-    tup_mod = mkModName "GHC.Tuple"
+    tup_mod = mkModName "Data.Tuple"