X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FHscMain.lhs;fp=ghc%2Fcompiler%2Fmain%2FHscMain.lhs;h=95ea74ebfc4203cf7aba4d91cac34c8cfb280273;hb=674689e20127e199e76cd19dd2f81dc5c2346bac;hp=124d9f0803ff22ed6a40824f9f6cfce7cbe13e8e;hpb=f1fdf769b432ca383b2033f5c973494905d225d1;p=ghc-hetmet.git

diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs
index 124d9f0..95ea74e 100644
--- a/ghc/compiler/main/HscMain.lhs
+++ b/ghc/compiler/main/HscMain.lhs
@@ -186,6 +186,8 @@ type FrontEnd core = HscEnv -> ModSummary -> Maybe (Int,Int) -> IO (Maybe core)
 type BackEnd core prepCore = HscEnv -> ModSummary -> Maybe ModIface -> core -> IO prepCore
 type CodeGen prepCore result = HscEnv -> ModSummary -> prepCore -> IO result
 
+-- FIXME: The old interface and module index are only using in 'make' and
+--        'interactive' mode. They should be removed from 'oneshot' mode.
 type Compiler result =  HscEnv
                      -> ModSummary
                      -> Bool                -- True <=> source unchanged
@@ -334,6 +336,7 @@ hscCoreFrontEnd hsc_env mod_summary mb_mod_index = do {
 	 
 hscFileFrontEnd :: FrontEnd ModGuts
 hscFileFrontEnd hsc_env mod_summary mb_mod_index = do {
+-- FIXME: Move 'DISPLAY PROGRESS MESSAGE' out of the frontend.
  	    -------------------
  	    -- DISPLAY PROGRESS MESSAGE
  	    -------------------
@@ -383,6 +386,8 @@ hscFileFrontEnd hsc_env mod_summary mb_mod_index = do {
 -- BackEnds
 --------------------------------------------------------------
 
+-- FIXME: Rename backend to simplifier, and codegen to backend.
+
 hscNewBootBackEnd :: BackEnd ModGuts (HscStatus, ModIface, ModDetails)
 hscNewBootBackEnd hsc_env mod_summary maybe_old_iface ds_result
   = do details <- mkBootModDetails hsc_env ds_result