[prune unreachable combinators after mangling, document TP@ names, make programSetE reset the entry points properly
John Meacham <john@repetae.net>**20060316051633] hunk ./E/Program.hs 62
--- | note, this will reset your entry points
hunk ./E/Program.hs 64
-programSetE (ELetRec ds mainBody) prog = programSetDs ((main,mainBody):ds) prog { progEntryPoints = [main], progMainEntry = main } where
+programSetE (ELetRec ds mainBody) prog = programSetDs ((main,mainBody):ds) prog { progMainEntry = main } where
hunk ./E/Program.hs 67
-programSetE e prog = prog { progCombinators = [(main,as,mainBody)], progEntryPoints = [main], progMainEntry = main } where
+programSetE e prog = prog { progCombinators = [(main,as,mainBody)], progMainEntry = main } where
hunk ./Grin/MangleE.hs 10
+import Control.Monad.Identity
hunk ./Grin/MangleE.hs 13
-import qualified Data.Set as Set
-import qualified Data.Map as Map
hunk ./Grin/MangleE.hs 14
-import Control.Monad.Identity
+import qualified Data.Map as Map
+import qualified Data.Set as Set
hunk ./Grin/MangleE.hs 17
-import Support.FreeVars
-import Util.Graph
hunk ./Grin/MangleE.hs 19
-import Name.Name
-import Util.Gen
-import qualified Stats
hunk ./Grin/MangleE.hs 28
+import Name.Name
+import qualified Stats
+import Support.FreeVars
+import Util.Gen
+import Util.Graph
hunk ./Grin/MangleE.hs 59
-    return (programPruneUnreachable prog)
+    return prog -- (programPruneUnreachable prog)
hunk ./docs/conventions.txt 29
-
-* TP@ - non type-erased version of function in case it was passed as an
-  argument to a rank-n function.