[properly merge multiple entries in the targets.ini files
John Meacham <john@repetae.net>**20090623003330
 Ignore-this: 5e11254aece611775f65769415e49e88
] hunk ./Support/IniParse.hs 95
-processIni :: Seq.Seq (String,Seq.Seq (String,String)) -> Map.Map String (Map.Map String String)
-processIni iniRaw = ans where
+processIni :: Seq.Seq (String,Seq.Seq (String,String)) -> Map.Map String (Seq.Seq (String,String))
+processIni iniRaw = iniMap' where
hunk ./Support/IniParse.hs 104
-    ans = Map.map (\c -> Seq.foldl res Map.empty c) iniMap'
-    res mp (k,v) | Just r <- getPrefix "+" (reverse k) = Map.insertWith f (reverse $ dropWhile isSpace r) v mp where
-        f y x = x ++ " " ++ y
-    res mp (k,v) = Map.insert k v mp
+--    ans = Map.map (\c -> Seq.foldl res Map.empty c) iniMap'
+--    res mp (k,v) | Just r <- getPrefix "+" (reverse k) = Map.insertWith f (reverse $ dropWhile isSpace r) v mp where
+--        f y x = x ++ " " ++ y
+--    res mp (k,v) = Map.insert k v mp
hunk ./Support/IniParse.hs 130
-            (be,[]) -> f xs (Map.findWithDefault Map.empty be pini `Map.union` cm)
+            (be,[]) -> f xs (Seq.foldl res cm (Map.findWithDefault Seq.empty be pini))
hunk ./Support/IniParse.hs 132
+--    ans = Map.map (\c -> Seq.foldl res Map.empty c) iniMap'
+        res mp (k,v) | Just r <- getPrefix "+" (reverse k) = Map.insertWith f (reverse $ dropWhile isSpace r) v mp where
+            f y x = x ++ " " ++ y
+        res mp (k,v) = Map.insert k v mp
hunk ./data/targets.ini 24
-gcc=i386-mingw32-gcc
-output_extension=.exe
+cc=i386-mingw32-gcc
+executable_extension=.exe
hunk ./data/targets.ini 32
-gcc=i686-apple-darwin9-gcc
+cc=i686-apple-darwin9-gcc
hunk ./data/targets.ini 37
-gcc=powerpc-apple-darwin9-gcc
+cc=powerpc-apple-darwin9-gcc