Ticket #132: haddock.dpatch

New patches:

[Make the code compatible with the stricter labelled-field parsing rules
Ian Lynagh <igloo@earth.li>**20090725211910] {
hunk ./src/Haddock/Backends/Hoogle.hs 114
-        f (TyClD d@TyData{}) = ppData d
-        f (TyClD d@ClassDecl{}) = ppClass d
-        f (TyClD d@TySynonym{}) = ppSynonym d
+        f (TyClD d@(TyData{})) = ppData d
+        f (TyClD d@(ClassDecl{})) = ppClass d
+        f (TyClD d@(TySynonym{})) = ppSynonym d
hunk ./src/Haddock/Backends/Hoogle.hs 139
-ppClass x = out x{tcdSigs=[]} :
+ppClass x = out (x{tcdSigs=[]}) :
hunk ./src/Haddock/Backends/Hoogle.hs 160
-ppData x = showData x{tcdCons=[],tcdDerivs=Nothing} :
+ppData x = showData (x{tcdCons=[],tcdDerivs=Nothing}) :
hunk ./src/Haddock/Interface/Create.hs 71
-  return Interface {
+  return $ Interface {
hunk ./src/Haddock/Interface/Create.hs 559
-    exportName e@ExportDecl {} =
+    exportName e@(ExportDecl {}) =
hunk ./src/Haddock/Interface/Create.hs 564
-    exportName ExportNoDecl {} = [] -- we don't count these as visible, since
-                                    -- we don't want links to go to them.
+    exportName (ExportNoDecl {}) = [] -- we don't count these as visible, since
+                                      -- we don't want links to go to them.
hunk ./src/Haddock/Interface.hs 104
-         _ <- setSessionDynFlags dflags { hscTarget = HscC } 
+         _ <- setSessionDynFlags (dflags { hscTarget = HscC })
hunk ./src/Haddock/InterfaceFile.hs 218
-      bh2 <- return $! setUserData bh1 ud'{ud_symtab = symtab}
+      bh2 <- return $! setUserData bh1 (ud'{ud_symtab = symtab})
hunk ./src/Haddock/InterfaceFile.hs 251
-putName BinSymbolTable{
+putName (BinSymbolTable{
hunk ./src/Haddock/InterfaceFile.hs 253
-            bin_symtab_next = symtab_next }    bh name
+            bin_symtab_next = symtab_next })    bh name
hunk ./src/Haddock/InterfaceFile.hs 274
-putFastString BinDictionary { bin_dict_next = j_r,
-                              bin_dict_map  = out_r}  bh f
+putFastString (BinDictionary { bin_dict_next = j_r,
+                               bin_dict_map  = out_r})  bh f
}

Context:

[Use cProjectVersion directly rather than going through compilerInfo
Ian Lynagh <igloo@earth.li>**20090716002031
 Fixes the build after changes in GHC
] 
[Fix unused import warnings
Ian Lynagh <igloo@earth.li>**20090707133545] 
[Bump version number
Ian Lynagh <igloo@earth.li>**20090705193540
 Cabal needs to distinguish between haddocks having a --verbose and
 --verbosity flag
] 
[Fix warnings
Ian Lynagh <igloo@earth.li>**20090705171759] 
[Remove the -Wwarn hack in the GHC build system
Ian Lynagh <igloo@earth.li>**20090705170148] 
[Resolve conflicts
Ian Lynagh <igloo@earth.li>**20090705170113] 
[Fix #104 - create output directory if missing
David Waern <david.waern@gmail.com>**20090627132603] 
[Remove misplaced whitespace in H.I.Rename
David Waern <david.waern@gmail.com>**20090627124646] 
[Document Interface and InstalledInterface better
David Waern <david.waern@gmail.com>**20090625215356
 Ignore-this: b78b2b038f68b36696a6ac06827ab358
] 
[Fix spelling error
David Waern <david.waern@gmail.com>**20090624223944] 
[Add Haddock module headers
David Waern <david.waern@gmail.com>**20090624222323
 
 Add a proper Haddock module header to each module, with a more finegrained
 copyright. If you feel mis-accreditted, please correct any copyright notice!
 
 The maintainer field is set to haddock@projects.haskell.org.
 
 Next step is to add a brief description to each module.
] 
[Delete Haddock.Exception and move contents to Haddock.Types
David Waern <david.waern@gmail.com>**20090624210750
 
 Only a few lines of code that mainly declares a type - why not just put it in Haddock.Types.
] 
[Resolve conflict
David Waern <david.waern@gmail.com>**20090426150943
 Ignore-this: 321562705f46ca5d32030dc8592def98
] 
[add unicode output
porges@porg.es**20081207082219] 
[Fix whitespace and stylistic issues in Main
David Waern <david.waern@gmail.com>**20090405130704
 Ignore-this: d8ba3067d2ea211c2078218a6a1e23bc
] 
[Remove Haddock.GHC and move its (small) contents to Main
David Waern <david.waern@gmail.com>**20090405125721
 Ignore-this: 778a1f65c6f462cf8333f54f30214aa3
] 
[Move H.GHC.Utils to H.GhcUtils
David Waern <david.waern@gmail.com>**20090405124253
 Ignore-this: 4e8249c709b954127c5f409a83b9f07
] 
[hlint police
David Waern <david.waern@gmail.com>**20090401205802
 Ignore-this: 8172c7b791dcefed0b153be1b97e7a1b
] 
[hlint police
David Waern <david.waern@gmail.com>**20090401204842
 Ignore-this: c1f0f643fee562b8357686d2d390a52b
] 
[hlint police
David Waern <david.waern@gmail.com>**20090401204030
 Ignore-this: 341379f58a73a5c06c2d5dad1e09e48d
] 
[Turn on -Wall -Werror
David Waern <david.waern@gmail.com>**20090328222339
 Ignore-this: ba1ff273b7a56d8fe280605ca0477cd1
] 
[-Wall police in Main
David Waern <david.waern@gmail.com>**20090328222259
 Ignore-this: a73bbbcdf64c4dc368405a852706c055
] 
[-Wall police in H.Interface
David Waern <david.waern@gmail.com>**20090328221019
 Ignore-this: f09fd8df77bde5b4c64afde68cdd2fa8
] 
[-Wall police in H.I.Create
David Waern <david.waern@gmail.com>**20090328215907
 Ignore-this: d4847e9b4dabe92bf5abbff8f409d788
] 
[Layout fix
David Waern <david.waern@gmail.com>**20090328212706
 Ignore-this: 7e9e6b7c9101da7151c755f79d032ba7
] 
[Wibble
David Waern <david.waern@gmail.com>**20090328210941
 Ignore-this: 761ebdb58bbf40ffb4582fa0a85b35dd
] 
[-Wall police in H.I.AttachInstances
David Waern <david.waern@gmail.com>**20090328001515
 Ignore-this: 17a477d8edc392df5fc110bfad7a95f6
] 
[-Wall police in H.I.Rename
David Waern <david.waern@gmail.com>**20090328000355
 Ignore-this: 35ece1ead654630f00964e215ffa423f
] 
[Wibble
David Waern <david.waern@gmail.com>**20090327235134
 Ignore-this: b9ea8b2004414fd6efc1e39d5161cda2
] 
[Define Foldable and Traversable instances for Located
David Waern <david.waern@gmail.com>**20090327234128
 Ignore-this: 84f7441937ab25a09710b63f8f3e51a
] 
[-Wall police in H.B.Hoogle
David Waern <david.waern@gmail.com>**20090327231253
 Ignore-this: 8a4fea2a78a94caef7bf6a177c1900fa
] 
[-Wall police
David Waern <david.waern@gmail.com>**20090327224521
 Ignore-this: 1b68fe34554d3c94a870758efbdfc657
] 
[Document DocName
David Waern <david.waern@gmail.com>**20090327220626
 Ignore-this: 48db339912ecd4205e2531d032abebdb
] 
[Remove H.DocName and put DocName in H.Types
David Waern <david.waern@gmail.com>**20090327213304
 Ignore-this: d30ebc4e11902d66daf7a5a7ede798b5
] 
[Use docNameOcc instead of nameOccName . getName
David Waern <david.waern@gmail.com>**20090327212146
 Ignore-this: f9bb557b4915deef9c3e604696a1ec14
] 
[Remove docNameOrig and use getName everywhere instead
David Waern <david.waern@gmail.com>**20090327211922
 Ignore-this: 5331a5f7173e2922161d32243e0eea40
] 
[Remove H.GHC.Typecheck
David Waern <david.waern@gmail.com>**20090327211511
 Ignore-this: 3ef47769b328a7d92a21dce438438250
] 
[Fix conflicts
David Waern <david.waern@gmail.com>**20090327000726
 Ignore-this: a5329bc1d069f75431a044a455d088e5
] 
[Add some basic "verbose" mode logging in H.Interface
David Waern <david.waern@gmail.com>**20081207200105] 
[Add verbosity flag and utils, remove "verbose" flag
David Waern <david.waern@gmail.com>**20081207195853] 
[-Wall police in H.B.Html
David Waern <david.waern@gmail.com>**20090326232044
 Ignore-this: 3fd73d651309faf2579f01ac386373
] 
[Fix warnings in H.B.DevHelp
David Waern <david.waern@gmail.com>**20090324222123
 Ignore-this: c4a52c2e870f69880582babdc5549298
] 
[Remove unnecessary LANGUAGE pragma
David Waern <david.waern@gmail.com>**20090324221015
 Ignore-this: 804942fa87d3c4aac9f1556ca06df3af
] 
[Update Makefile for the new GHC build system
Ian Lynagh <igloo@earth.li>**20090705165035] 
[Follow extra field in ConDecl
simonpj@microsoft.com**20090702153522
 Ignore-this: dc96d475bbbf2a9a2c8c12c5ed95019d
] 
[TAG 2009-06-25
Ian Lynagh <igloo@earth.li>**20090625155950] 
Patch bundle hash:
90f110a219c2d82940237c3561a40e7bbbafcee7