From f5b2e1dd9c978790cacb1a5c1acd361eec5e4d44 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Tue, 8 Apr 2003 13:03:42 +0000
Subject: [PATCH] [project @ 2003-04-08 13:03:42 by simonpj] ToDo comments

---
 ghc/compiler/main/MkIface.lhs |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/ghc/compiler/main/MkIface.lhs b/ghc/compiler/main/MkIface.lhs
index 67363ca..e165020 100644
--- a/ghc/compiler/main/MkIface.lhs
+++ b/ghc/compiler/main/MkIface.lhs
@@ -498,6 +498,7 @@ mkUsageInfo hsc_env eps
   where
     usages = catMaybes [ mkUsage mod_name 
 		       | (mod_name,_) <- moduleEnvElts dep_mods]
+	-- ToDo: do we need to sort into canonical order?
 
     hpt = hsc_HPT hsc_env
     pit = eps_PIT eps
@@ -557,6 +558,7 @@ mkUsageInfo hsc_env eps
         ent_vers = [(n, lookupVersion version_env n) 
     	           | n <- sortLt lt_occ used_names ]
         lt_occ n1 n2 = nameOccName n1 < nameOccName n2
+	-- ToDo: is '<' on OccNames the right thing; may differ between runs?
 \end{code}
 
 \begin{code}
-- 
1.7.10.4