Commit d9edc9b8 authored by Simon Marlow's avatar Simon Marlow

add test for #1227

parent 41c51aff
TOP=../../../..
include $(TOP)/mk/boilerplate.mk
include $(TOP)/mk/test.mk
# Test for #1227
# We need to run with +RTS -hc -hbvoid -RTS, so we can't use the normal
# profiling ways which add their own RTS opts. Hence we build the normal ways,
# adding our own profiling opts.
test('bio001', compose(only_ways(['normal', 'optc', 'optasm']),
extra_run_opts('+RTS -hc -hbvoid -i0.01')),
compile_and_run, ['-prof -auto-all'])
-- Test for #1227
module Main where
loop n = foldr (+) 0 [1..n]
main = print (loop 100000)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment