> > -fno-state-hack? > > That, or > {-# LANGUAGE BangPatterns #-} > ... > !pole <- liftM (build n . map read . words) getLine
Works for me, thanks! Petr _______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe