-fno-prune-tydecls -O

[S.D.Mechveliani]

For

data OSet a =
     OSet {osetSample  :: !a,          
           membership  :: !(Char -> a -> Bool),
           osetCard    :: !(InfUnn Z), 
           osetPointed :: !(MMaybe a),  
           osetList    :: !(Maybe [a]),
           osetBounds  :: !(MMaybe a,MMaybe a,MMaybe a,MMaybe a),
           osetProps   :: !Properties_OSet,
           osetConstrs :: ![Construction_OSet a],
           osetOpers   :: !(Operations_OSet a)
          }
          deriving(Show)

  ghc-4.02 -c 

reports a Warning  about some constructor thing for InfUnn being not
defined and about better to use  -fno-prune-tydecls.

User_guide  writes this may be with  -Onot.
But i get this Warning with  -O  too.

I also have a question:
does this help the performance to set `!' everywere in the above 
record?


------------------
Sergey Mechveliani
[EMAIL PROTECTED]