untabify

[ghc-base.git] / Data / Generics / Schemes.hs

diff --git a/Data/Generics/Schemes.hs b/Data/Generics/Schemes.hs
index f23bcd0..4e75a82 100644 (file)
--- a/Data/Generics/Schemes.hs
+++ b/Data/Generics/Schemes.hs
@@ -14,24 +14,24 @@
 --
 -----------------------------------------------------------------------------
 
-module Data.Generics.Schemes ( 
+module Data.Generics.Schemes (
 
         everywhere,
         everywhere',
         everywhereBut,
         everywhereM,
         somewhere,
-       everything,
-       listify,
+        everything,
+        listify,
         something,
-       synthesize,
-       gsize,
-       glength,
-       gdepth,
-       gcount,
-       gnodecount,
-       gtypecount,
-       gfindtype
+        synthesize,
+        gsize,
+        glength,
+        gdepth,
+        gcount,
+        gnodecount,
+        gtypecount,
+        gfindtype
 
  ) where
 
@@ -98,7 +98,7 @@ everything :: (r -> r -> r) -> GenericQ r -> GenericQ r
 -- use gmapQ to recurse into immediate subterms;
 -- use ordinary foldl to reduce list of intermediate results
 -- 
-everything k f x 
+everything k f x
   = foldl k (f x) (gmapQ (everything k f) x)