Repository : ssh://darcs.haskell.org//srv/darcs/nofib On branch : supercompiler
http://hackage.haskell.org/trac/ghc/changeset/b65222fb4962b04f0827ed89e498ad44a5e15671 >--------------------------------------------------------------- commit b65222fb4962b04f0827ed89e498ad44a5e15671 Author: Max Bolingbroke <batterseapo...@hotmail.com> Date: Thu Mar 15 09:58:43 2012 +0000 Playing with Bernouilli >--------------------------------------------------------------- imaginary/bernouilli/Main.hs | 1 + imaginary/bernouilli/Makefile | 2 ++ 2 files changed, 3 insertions(+), 0 deletions(-) diff --git a/imaginary/bernouilli/Main.hs b/imaginary/bernouilli/Main.hs index 5886c67..dde0756 100644 --- a/imaginary/bernouilli/Main.hs +++ b/imaginary/bernouilli/Main.hs @@ -22,6 +22,7 @@ neg_powers = pascal:: [[Integer]] pascal = [1,2,1] : map (\line -> zipWith (+) (line++[0]) (0:line)) pascal +{-# SUPERCOMPILE bernoulli #-} bernoulli 0 = 1 bernoulli 1 = -(1%2) bernoulli n | odd n = 0 diff --git a/imaginary/bernouilli/Makefile b/imaginary/bernouilli/Makefile index 56dd57c..cf5295a 100644 --- a/imaginary/bernouilli/Makefile +++ b/imaginary/bernouilli/Makefile @@ -6,5 +6,7 @@ include $(TOP)/mk/boilerplate.mk SRCS=Main.hs PROG_ARGS += 500 +SRC_SUPERCOMP_HC_OPTS = + include $(TOP)/mk/target.mk _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
