[hoc-cvs] [hoc commit] r344 - trunk/hoc/InterfaceGenerator2

[<cod...@go...>]

Author: wol...@gm...
Date: Sat Oct 25 14:15:21 2008
New Revision: 344

Modified:
    trunk/hoc/InterfaceGenerator2/Main.hs

Log:
don't forget to add the progress reporter for the renaming phase
to the list of progress bars


Modified: trunk/hoc/InterfaceGenerator2/Main.hs
==============================================================================
--- trunk/hoc/InterfaceGenerator2/Main.hs	(original)
+++ trunk/hoc/InterfaceGenerator2/Main.hs	Sat Oct 25 14:15:21 2008
@@ -157,8 +157,9 @@
                                             [initialProgress,  
resolveProgress,
                                              typeProgress, zapProgress,
                                              expandProgress,  
combineProgress,
-                                            eliminateProgress,  
outputProgress,
-                                            masterProgress, exportProgress]
+                                            renameProgress,  
eliminateProgress,
+                                            outputProgress, masterProgress,
+                                            exportProgress]

          headers <- fmap concat $ flip mapM (oHeaderDirectories options) $
                          \hd -> case hd of