From: Thomas Schilling <nominolo@googlemail.com>
Date: Mon, 6 Oct 2008 22:29:40 +0000 (+0000)
Subject: Add accessors to 'Target' fields and haddockify.
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=65d029eaf23c31bf7f4ae8ad2292ba30720f2182

Add accessors to 'Target' fields and haddockify.

MERGE TO 6.10
---

diff --git a/compiler/main/HscTypes.lhs b/compiler/main/HscTypes.lhs
index 30362a8..94d0f9e 100644
--- a/compiler/main/HscTypes.lhs
+++ b/compiler/main/HscTypes.lhs
@@ -497,9 +497,11 @@ hscEPS hsc_env = readIORef (hsc_EPS hsc_env)
 -- is for use in an IDE where the file hasn't been saved by
 -- the user yet).
 data Target = Target
-      TargetId                          -- module or filename
-      Bool                              -- object code allowed?
-      (Maybe (StringBuffer,ClockTime))  -- in-memory text buffer?
+      { targetId           :: TargetId  -- ^ module or filename
+      , targetAllowObjCode :: Bool      -- ^ object code allowed?
+      , targetContents     :: Maybe (StringBuffer,ClockTime)
+                                        -- ^ in-memory text buffer?
+      }
 
 data TargetId
   = TargetModule ModuleName