From f5eb40612c3ffb99042960c2fe28680feff7b73f Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@cse.unsw.edu.au>
Date: Mon, 25 Apr 2005 03:49:54 +0000
Subject: [PATCH] Stop Map.hs error with 6.2.2 in runplugs

---
 examples/plugs/runplugs/Main.hs | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/examples/plugs/runplugs/Main.hs b/examples/plugs/runplugs/Main.hs
index ba0c110..585cdfe 100644
--- a/examples/plugs/runplugs/Main.hs
+++ b/examples/plugs/runplugs/Main.hs
@@ -1,5 +1,6 @@
+{-# OPTIONS -cpp #-}
 --
--- Copyright (c) 2004 Don Stewart - http://www.cse.unsw.edu.au/~dons
+-- Copyright (c) 2004-5 Don Stewart - http://www.cse.unsw.edu.au/~dons
 -- GPL version 2 or later (see http://www.gnu.org/copyleft/gpl.html)
 --
 
@@ -27,7 +28,12 @@ prehier = ["Char", "List", "Maybe", "Numeric", "Random" ]
 
 datas   = map ("Data." ++) [
                 "Bits", "Bool", "Char", "Dynamic", "Either", 
-                "Map", "Graph", "Int", "Ix", "List", "Maybe", 
+                "Graph", "Int", "Ix", "List", "Maybe", 
+#if __GLASGOW_HASKELL__ >= 604
+                "Map",
+#else
+                "FiniteMap",
+#endif
                 "Ratio", "Set", "Tree", "Tuple", "Typeable", "Word" 
               ]