[code cleanups. add entry points to Grin structure
John Meacham <john@repetae.net>**20051024101920] hunk ./C/FromGrin.hs 9
-import qualified Data.Map as Map
hunk ./C/FromGrin.hs 11
-import Text.PrettyPrint.HughesPJ(nest,($$),($+$))
+import Text.PrettyPrint.HughesPJ(nest,($$))
hunk ./C/FromGrin.hs 18
-import E.Pretty(render)
hunk ./C/FromGrin.hs 23
-import qualified Util.Seq as Seq
hunk ./C/FromGrin.hs 24
-import Name.VConsts
hunk ./C/FromGrin.hs 125
-    mapM_ statement [CSAssign  (CEDot tmp' ('a':show i)) a | a <- as' | i <- [1 ..] ]
+    mapM_ statement [CSAssign  (CEDot tmp' ('a':show i)) a | a <- as' | i <- [(1 :: Int) ..] ]
hunk ./C/FromGrin.hs 136
-    mapM_ statement [CSAssign  (CEIndirect tmp' ('a':show i)) a | a <- as' | i <- [1 ..] ]
+    mapM_ statement [CSAssign  (CEIndirect tmp' ('a':show i)) a | a <- as' | i <- [(1 :: Int) ..] ]
hunk ./C/FromGrin.hs 259
-    let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [1 ..] ]
+    let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [( 1 :: Int) ..] ]
hunk ./C/FromGrin.hs 269
-    let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [1 ..] ]
+    let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [(1 :: Int) ..] ]
hunk ./C/FromGrin.hs 319
-            let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [1 ..] ]
+            let ass = [CSAssign  a (CEDot tmp ('a':show i)) | a <- as' | i <- [(1 :: Int) ..] ]
hunk ./Grin/FromE.hs 23
-import E.Pretty(render)
hunk ./Grin/FromE.hs 162
+            grinEntryPoints = [funcMain],
hunk ./Grin/Grin.hs 174
+    grinEntryPoints :: [Atom],
hunk ./Grin/Interpret.hs 3
-import Data.IORef
-import Grin.Grin
hunk ./Grin/Interpret.hs 4
+import Char
+import CharIO
hunk ./Grin/Interpret.hs 7
-import qualified FlagDump as FD
-import Options
-import Data.Monoid
-import qualified Stats
+import Data.IORef
hunk ./Grin/Interpret.hs 9
-import E.Pretty(render)
-import Grin.Show
-import CharIO
-import Char
-import Name.VConsts
---import Grin.Primitives
-import Doc.Pretty
+import Data.Monoid
hunk ./Grin/Interpret.hs 11
-import E.Pretty
+import Doc.Pretty
hunk ./Grin/Interpret.hs 13
+import Grin.Grin
+import Grin.Show
+import Name.VConsts
+import Options
+import qualified FlagDump as FD
+import qualified Stats
hunk ./Main.hs 31
-import E.Pretty
+import E.Pretty hiding(render)