diff --git a/asterius/nofib/imaginary/exp3_8/Main.hs b/asterius/nofib/imaginary/exp3_8/Main.hs
index 4f6d46eeb1..f1cefd6bd9 100644
--- a/asterius/nofib/imaginary/exp3_8/Main.hs
+++ b/asterius/nofib/imaginary/exp3_8/Main.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 {-
 From augustss@cs.chalmers.se Sat Jan 11 11:56:04 1992
 From: augustss@cs.chalmers.se (Lennart Augustsson)
diff --git a/asterius/nofib/real/anna/BaseDefs.hs b/asterius/nofib/real/anna/BaseDefs.hs
index 28ff7ba45c..1562e1ee47 100644
--- a/asterius/nofib/real/anna/BaseDefs.hs
+++ b/asterius/nofib/real/anna/BaseDefs.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 
 -- ==========================================================--
 -- === Base declarations                      BaseDefs.hs ===--
diff --git a/asterius/nofib/real/bspt/Input.lhs b/asterius/nofib/real/bspt/Input.lhs
index 23644a99f9..10120ddc81 100644
--- a/asterius/nofib/real/bspt/Input.lhs
+++ b/asterius/nofib/real/bspt/Input.lhs
@@ -1,4 +1,5 @@
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Input where
 import Interpret
 import Euclid
diff --git a/asterius/nofib/real/bspt/Rationals.lhs b/asterius/nofib/real/bspt/Rationals.lhs
index f31bd3697f..7654bcf6d2 100644
--- a/asterius/nofib/real/bspt/Rationals.lhs
+++ b/asterius/nofib/real/bspt/Rationals.lhs
@@ -1,3 +1,4 @@
+> {-# OPTIONS_GHC -Wno-missing-methods #-}
 > module Rationals
 
 >		(Rationals(..),rndNR)
@@ -21,7 +22,7 @@
 >	(p :%% q) <= (r :%% s) = p*s <= q*r
 
 > instance Num Rationals where
-	
+
 	(+): rational addition is performed by converting
 	the arguments to a form where they share a common
 	denominator.
diff --git a/asterius/nofib/real/hidden/Geometric.hs b/asterius/nofib/real/hidden/Geometric.hs
index c8802d1bb6..967bf07e7a 100644
--- a/asterius/nofib/real/hidden/Geometric.hs
+++ b/asterius/nofib/real/hidden/Geometric.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 module Geometric (Geom(..)) where
 import Numbers
 import Vectors
diff --git a/asterius/nofib/real/hidden/Numbers.hs b/asterius/nofib/real/hidden/Numbers.hs
index 090b9ec497..411e65f566 100644
--- a/asterius/nofib/real/hidden/Numbers.hs
+++ b/asterius/nofib/real/hidden/Numbers.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 module Numbers(Number) where
 data Number = Tolerant Float
 -- if you are not using the Chalmers Haskell B compiler then remove the @
diff --git a/asterius/nofib/real/linear/Cg.lhs b/asterius/nofib/real/linear/Cg.lhs
index 4c029fe224..f9889fc55d 100644
--- a/asterius/nofib/real/linear/Cg.lhs
+++ b/asterius/nofib/real/linear/Cg.lhs
@@ -16,6 +16,7 @@
 
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 
 module Cg(cgiters,Cg_state (..),showcg_state)
         where
diff --git a/asterius/nofib/real/linear/Densematrix.lhs b/asterius/nofib/real/linear/Densematrix.lhs
index 8667c912cf..74fc3896ac 100644
--- a/asterius/nofib/real/linear/Densematrix.lhs
+++ b/asterius/nofib/real/linear/Densematrix.lhs
@@ -32,7 +32,7 @@
                                   assumes the arg is column major.
 
 \begin{code}
-
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Densematrix(Matrix,Vector,
         mmult, madd, msub, vouter, vdot, norm ,mneg ,mxpose,mident, msize,
         mkmat, mkrmat, mkcmat, mkvec, mkrvec, mkcvec,
diff --git a/asterius/nofib/real/linear/Input.lhs b/asterius/nofib/real/linear/Input.lhs
index 0df242b59b..01d8e64527 100644
--- a/asterius/nofib/real/linear/Input.lhs
+++ b/asterius/nofib/real/linear/Input.lhs
@@ -29,6 +29,7 @@ Notes:
       (r,c,b) = (r-1,c-1,..) to make indices zero origin.
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Input
 (gmat,rhside,soln_vect,wells,split,blm',mkbigvec,
               mksparse,a_easy,a_hard,x1) where
diff --git a/asterius/nofib/real/linear/Matlib.lhs b/asterius/nofib/real/linear/Matlib.lhs
index 8175b79041..cca30d5f69 100644
--- a/asterius/nofib/real/linear/Matlib.lhs
+++ b/asterius/nofib/real/linear/Matlib.lhs
@@ -22,6 +22,7 @@ Notes:
   The import of AbsDensematrix is to keep hbc happy.
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Matlib (scale, precond, uncondition) where
 
 import Data.List (genericLength)
diff --git a/asterius/nofib/real/linear/Matrix.lhs b/asterius/nofib/real/linear/Matrix.lhs
index 094b5702f8..fe88409e52 100644
--- a/asterius/nofib/real/linear/Matrix.lhs
+++ b/asterius/nofib/real/linear/Matrix.lhs
@@ -8,6 +8,7 @@
  =======================================================================
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 
 module Matrix
          (Matrix, Vector, Block , Vec ,
@@ -145,7 +146,7 @@ mupdate m (i,j) val
      where
         f xs = (take j xs) ++ [(i, (j+1), val)] ++ (drop (j+1) xs)
 
-	
+
 vupdate v i vc = (take i v) ++ [vc] ++ (drop (i+1) v)
 
 
diff --git a/asterius/nofib/real/symalg/BasicNumber.hs b/asterius/nofib/real/symalg/BasicNumber.hs
index 0e5934a8ff..be4943824c 100644
--- a/asterius/nofib/real/symalg/BasicNumber.hs
+++ b/asterius/nofib/real/symalg/BasicNumber.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 module BasicNumber (BasicNumber (..), makeReal, makeRational, RealT{-partain-}) where
 
 import RealM
diff --git a/asterius/nofib/real/veritas/Type_defs.lhs b/asterius/nofib/real/veritas/Type_defs.lhs
index 990b45eb15..529d2d2280 100644
--- a/asterius/nofib/real/veritas/Type_defs.lhs
+++ b/asterius/nofib/real/veritas/Type_defs.lhs
@@ -1,3 +1,5 @@
+> {-# OPTIONS_GHC -Wno-missing-methods #-}
+
 > module Type_defs where
 
 > import Core_datatype
diff --git a/asterius/nofib/spectral/atom/Main.hs b/asterius/nofib/spectral/atom/Main.hs
index 5965775668..6aa1ef72a1 100644
--- a/asterius/nofib/spectral/atom/Main.hs
+++ b/asterius/nofib/spectral/atom/Main.hs
@@ -1,4 +1,5 @@
 {-# OPTIONS_GHC -Wno-tabs #-}
+{-# OPTIONS_GHC -Wno-missing-methods #-}
 {-	A kernel fragment from a program written by
 		Ron Legere  -- http://www.its.caltech.edu/~legere
 		Caltech Quantum Optics
diff --git a/asterius/nofib/spectral/knights/ChessSetList.lhs b/asterius/nofib/spectral/knights/ChessSetList.lhs
index f5c2f4733c..dcaecb7b6b 100644
--- a/asterius/nofib/spectral/knights/ChessSetList.lhs
+++ b/asterius/nofib/spectral/knights/ChessSetList.lhs
@@ -9,6 +9,7 @@ data parallel search (for instance wedge first??). This module
 abstracts data type specific operations used in the Heuristic part of the tour.
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module ChessSetList(Tile,
 		    ChessSet,
 		    createBoard,
@@ -61,7 +62,7 @@ instance Eq ChessSet where
     _ == _ = True
 
 instance Ord ChessSet where
-    _ <= _ = True			
+    _ <= _ = True
 
 instance Show ChessSet where
    showsPrec p board@(Board sze n f ts)
diff --git a/asterius/nofib/spectral/knights/KnightHeuristic.lhs b/asterius/nofib/spectral/knights/KnightHeuristic.lhs
index de7795b2e8..2260a05796 100644
--- a/asterius/nofib/spectral/knights/KnightHeuristic.lhs
+++ b/asterius/nofib/spectral/knights/KnightHeuristic.lhs
@@ -4,6 +4,7 @@
 \section{Knights Tour Heuristic.}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%M O D U L E%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module KnightHeuristic(
 	ChessSet,
 	startTour,
@@ -127,7 +128,7 @@ descendents board
 		          where
 		             singles = singleDescend board
 
-singleDescend::ChessSet -> [ChessSet]		
+singleDescend::ChessSet -> [ChessSet]
 singleDescend board =[x | (y,x) <- descAndNo board, y==1]
 
 descAndNo::ChessSet -> [(Int,ChessSet)]
diff --git a/asterius/nofib/spectral/knights/Main.lhs b/asterius/nofib/spectral/knights/Main.lhs
index 022c101241..34fd4496d4 100644
--- a/asterius/nofib/spectral/knights/Main.lhs
+++ b/asterius/nofib/spectral/knights/Main.lhs
@@ -5,6 +5,7 @@
 \section{The Main Program.}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%M O D U L E%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Main(main) where
 \end{code}
 %%%%%%%%%%%%%%%%%% I M P O R T S  /  T Y P E   D E F S %%%%%%%%%%%%%%
diff --git a/asterius/nofib/spectral/knights/Queue.lhs b/asterius/nofib/spectral/knights/Queue.lhs
index 682a62d35e..e7d9ff0682 100644
--- a/asterius/nofib/spectral/knights/Queue.lhs
+++ b/asterius/nofib/spectral/knights/Queue.lhs
@@ -5,6 +5,7 @@
 \section{A Queue Abstract data type}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Queue(
 		Queue, createQueue, addFront, addBack,
 		addAllFront, addAllBack, inquireFront,
diff --git a/asterius/nofib/spectral/knights/Sort.lhs b/asterius/nofib/spectral/knights/Sort.lhs
index edea2e02d0..6af29a15f5 100644
--- a/asterius/nofib/spectral/knights/Sort.lhs
+++ b/asterius/nofib/spectral/knights/Sort.lhs
@@ -10,6 +10,7 @@ i.e ``{\tt import Sort(lazySort) renaming sort}'' imports {\tt lazySort},
 which can be referenced in the current scope as {\tt sort}.
 
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Sort(insertSort,mergeSort,quickSort,lazySort)  where
 
 \end{code}
@@ -144,7 +145,7 @@ rands s1 s2
    = if z < 1 then z + 2147483562 : rands s1'' s2''
      else
 	 z : rands s1'' s2''
-     where	
+     where
 	k    = s1 `div` 53668
 	s1'  = 40014 * (s1 - k * 53668) - k * 12211
 	s1'' = if s1' < 0 then s1' + 2147483563 else s1'
diff --git a/asterius/nofib/spectral/mandel/Mandel.lhs b/asterius/nofib/spectral/mandel/Mandel.lhs
index 3f460ceec8..115efbb33a 100644
--- a/asterius/nofib/spectral/mandel/Mandel.lhs
+++ b/asterius/nofib/spectral/mandel/Mandel.lhs
@@ -7,6 +7,7 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \begin{onlystandalone}
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module Mandel where
 import Data.Complex -- 1.3
 import PortablePixmap
diff --git a/asterius/nofib/spectral/mandel/PortablePixmap.lhs b/asterius/nofib/spectral/mandel/PortablePixmap.lhs
index 8166cb5767..dad703fc44 100644
--- a/asterius/nofib/spectral/mandel/PortablePixmap.lhs
+++ b/asterius/nofib/spectral/mandel/PortablePixmap.lhs
@@ -95,6 +95,7 @@ AUTHOR
 Sun Release 4.1  Last change: 15 September 1990                 2
 \end{verbatim}
 \begin{code}
+{-# OPTIONS_GHC -Wno-tabs #-}
 module PortablePixmap where
 
 data PixMap = Pixmap Integer Integer Int [(Int,Int,Int)]