[add transformation parameters data type
John Meacham <john@repetae.net>**20060719033217] hunk ./Main.hs 805
+
+data TransformParms = TransformParms {
+    transformIterate :: Iterate,
+    transformDumpProgress :: Bool,
+    transformOperation :: Program -> IO Program,
+    transformCategory :: String,   -- ^ general name of transformation
+    transformPass :: String,       -- ^ what pass we are in
+    transformName :: String        -- ^ name of what we are working on
+    }
+
+transformParms = TransformParms {
+    transformIterate = DontIterate,
+    transformDumpProgress = False,
+    transformCategory = "Unknown",
+    transformPass = "",
+    transformOperation = return,
+    transformName = ""
+    }