[replace propegate with propagate
shae@ScannedInAvian.com**20051025234545] hunk ./E/LetFloat.hs 48
-    ticks stats n (toAtom "E.Simplify.copy-propegate")
+    ticks stats n (toAtom "E.Simplify.copy-propagate")
hunk ./E/Traverse.hs 44
-    propegateRecord :: Int -> m (),
+    propagateRecord :: Int -> m (),
hunk ./E/Traverse.hs 55
-    propegateRecord = \_ -> return (),
+    propagateRecord = \_ -> return (),
hunk ./E/Traverse.hs 139
-                lift $ lift $  propegateRecord tOpt 1
+                lift $ lift $  propagateRecord tOpt 1
hunk ./Fixer.hs 85
-    propegateValue v rv
+    propagateValue v rv
hunk ./Fixer.hs 101
-modifiedSuperSetOf (IV rv) (ConstValue cv) r = propegateValue (r cv) rv
-modifiedSuperSetOf (IV rv) v2 r = addAction v2 (\x -> propegateValue (r x) rv)
+modifiedSuperSetOf (IV rv) (ConstValue cv) r = propagateValue (r cv) rv
+modifiedSuperSetOf (IV rv) v2 r = addAction v2 (\x -> propagateValue (r x) rv)
hunk ./Fixer.hs 106
-(IV rv) `isSuperSetOf` (ConstValue v2) = propegateValue v2 rv
-(IV rv) `isSuperSetOf` v2 = addAction v2 (\x -> propegateValue x rv)
+(IV rv) `isSuperSetOf` (ConstValue v2) = propagateValue v2 rv
+(IV rv) `isSuperSetOf` v2 = addAction v2 (\x -> propagateValue x rv)
hunk ./Fixer.hs 117
-propegateValue :: Fixable a => a -> RvValue a -> IO ()
-propegateValue p v = do
+propagateValue :: Fixable a => a -> RvValue a -> IO ()
+propagateValue p v = do
hunk ./Grin/Simplify.hs 31
--- copy propegation
--- CSE / constant propegation
+-- copy propagation
+-- CSE / constant propagation