[project @ 2004-06-02 08:23:46 by simonpj]
authorsimonpj <unknown>
Wed, 2 Jun 2004 08:23:46 +0000 (08:23 +0000)
committersimonpj <unknown>
Wed, 2 Jun 2004 08:23:46 +0000 (08:23 +0000)
-------------------------------
Fix a grevious bug in DsMeta
which caused a seg fault
-------------------------------

The bug was an incorrectly declared type for one of the Template
Haskell construction functions in DsMeta (repRecCon, repRecUpd)
and some associated jiggery pokery.

-dcore-lint showed it up nicely, because the desugarer generated
ill-typed code.

DsMeta PrelNames TH.Lib

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

index 3d25349..c2a56b3 100644 (file)
@@ -29,6 +29,7 @@ type StmtQ          = Q Stmt
 type RangeQ         = Q Range
 type StrictTypeQ    = Q StrictType
 type VarStrictTypeQ = Q VarStrictType
+type FieldExpQ      = Q FieldExp
 
 ----------------------------------------------------------
 -- Lowercase pattern syntax functions