[Use transformProgram for "typeAnalyzeMethods" pass
Samuel Bronson <naesten@gmail.com>**20090202171247] hunk ./Main.hs 532
-    prog <- if (fopts FO.TypeAnalysis) then do typeAnalyze False prog else return prog
+
+    prog <- if (fopts FO.TypeAnalysis) then do 
+      transformProgram transformParms { transformCategory = "typeAnalyzeMethods",
+                                        transformOperation = typeAnalyze False,
+                                        transformDumpProgress = dump FD.Progress }
+                       prog
+            else return prog
+