Annotations aren't working

Some annotations tests are failing, e.g.:

=====> annrun01(normal) 1718 of 2892 [0, 16, 0]
cd ./annotations/should_run && $MAKE -s config
make[1]: Entering directory `/64playpen/simonmar/nightly/HEAD-cam-04-unx/x86_64-unknown-linux/testsuite/tests/ghc-regress/annotations/should_run'
Creating Config.hs ... 
make[1]: Leaving directory `/64playpen/simonmar/nightly/HEAD-cam-04-unx/x86_64-unknown-linux/testsuite/tests/ghc-regress/annotations/should_run'
cd ./annotations/should_run && '/64playpen/simonmar/nightly/HEAD-cam-04-unx/x86_64-unknown-linux/inplace/bin/ghc-stage2' -fforce-recomp -dcore-lint -dcmm-lint -dno-debug-output -no-user-package-conf -rtsopts  --make -o annrun01 annrun01  -package ghc  >annrun01.comp.stderr 2>&1
cd ./annotations/should_run && ./annrun01    </dev/null >annrun01.run.stdout 2>annrun01.run.stderr
Actual stdout output differs from expected:
--- ./annotations/should_run/annrun01.stdout	2011-07-20 18:00:41.838228896 +0100
+++ ./annotations/should_run/annrun01.run.stdout	2011-07-20 23:21:18.978853712 +0100
@@ -4,10 +4,10 @@
 Finding Module
 Getting Module Info
 Showing Details For Module
-([10],[],["Rock!!!!","Annotations","Module"],[])
+([],[],[],[])
 Showing Details For Exports
-([],[Just True],["Type Annotation"],[Annrun01_Help.Baz])
 ([],[],[],[])
-([1],[],["Hello World Again!"],[Annrun01_Help.bar,Annrun01_Help.foo])
 ([],[],[],[])
-([],[],["World!","Hello"],[])
+([],[],[],[])
+([],[],[],[])
+([],[],[],[])
*** unexpected failure for annrun01(normal)

This looks like it might be related to the recent Typeable changes, but I'm not at all familiar with this code.

Trac metadata

Trac field	Value
Version	7.1
Type	Bug
TypeOfFailure	OtherFailure
Priority	highest
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture