auto cost centres for where decls

[John Meacham]

I have a large function with a lot of local definitions I would like
indepdent cost centres for, however, since the local definitions arn't
top-level auto-all doesn't catch them. is there some short cut to
declare a whole list of decls should have cost centres? 

I was thinking something like

foo = ... where {-# SCC "foo" #-}
        baz = ...
        bar = ...
 
would cause baz and bar to have cost centres named "foo.baz" and
"foo.bar" 
        John


-- 
---------------------------------------------------------------------------
John Meacham - California Institute of Technology, Alum. - john at foo.net
---------------------------------------------------------------------------