Hi! > You can replace > addToFM_C (+) a x 1 > with > let a' = addToFM_C (+) a x 1 in > lookupFM a' x `seq` a'
it is not strict also. > or you can generalize that into your own strict version of addToFM_C. It's > a little ugly, but probably gets the job done. Ohh.. -- Alexander Kogan Institute of Applied Physics Russian Academy of Sciences _______________________________________________ Haskell-Cafe mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/haskell-cafe
