Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/4a088f806736b8e7c55be334a946f134ba9a30b6 >--------------------------------------------------------------- commit 4a088f806736b8e7c55be334a946f134ba9a30b6 Author: Simon Peyton Jones <[email protected]> Date: Fri Apr 27 18:06:33 2012 +0100 Revert "Make more primops cheaper" This reverts commit a365a58eade7cb2c961af8e60c20b7d78b1b7484. Sigh. Seg fault. Major sigh. >--------------------------------------------------------------- compiler/prelude/PrimOp.lhs | 2 -- 1 files changed, 0 insertions(+), 2 deletions(-) diff --git a/compiler/prelude/PrimOp.lhs b/compiler/prelude/PrimOp.lhs index 02b6f0b..50803fb 100644 --- a/compiler/prelude/PrimOp.lhs +++ b/compiler/prelude/PrimOp.lhs @@ -450,8 +450,6 @@ primOpIsCheap op -- This is vital; see Note [PrimOp can_fail and has_side_effects] && not (primOpOutOfLine op) -- && primOpCodeSize op <= primOpCodeSizeDefault --- Omitting; it makes fft2 run a lot slower by preventing --- eta expansion in an inner loop, with a primop cosDouble# -- The latter two conditions are a HACK; we should -- really have a proper property on primops that says -- when they are cheap to execute. For now we are using _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
