diff options
| author | simonmar <unknown> | 2003-07-28 13:30:35 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2003-07-28 13:30:35 +0000 |
| commit | 70e137ead1809516991ff4152842be08561404ee (patch) | |
| tree | eb98f9a1515f15397165846e6293c260d8f0b957 | |
| parent | b0856e7d7185f86245846d574cdea943621adc4f (diff) | |
[haddock @ 2003-07-28 13:30:35 by simonmar]
Add tests for a couple of bugs.
| -rw-r--r-- | examples/A.hs | 2 | ||||
| -rw-r--r-- | examples/B.hs | 2 | ||||
| -rw-r--r-- | examples/Bug1.hs | 4 | ||||
| -rw-r--r-- | examples/Bug2.hs | 4 | ||||
| -rw-r--r-- | examples/Makefile | 2 |
5 files changed, 14 insertions, 0 deletions
diff --git a/examples/A.hs b/examples/A.hs new file mode 100644 index 00000000..4a344a24 --- /dev/null +++ b/examples/A.hs @@ -0,0 +1,2 @@ +module A where +data A = A diff --git a/examples/B.hs b/examples/B.hs new file mode 100644 index 00000000..3a31507e --- /dev/null +++ b/examples/B.hs @@ -0,0 +1,2 @@ +module B ( module A ) where +import A diff --git a/examples/Bug1.hs b/examples/Bug1.hs new file mode 100644 index 00000000..a7151b7f --- /dev/null +++ b/examples/Bug1.hs @@ -0,0 +1,4 @@ +module Bug1 where + +-- we should have different anchors for constructors and types/classes. +data T = T diff --git a/examples/Bug2.hs b/examples/Bug2.hs new file mode 100644 index 00000000..9121922e --- /dev/null +++ b/examples/Bug2.hs @@ -0,0 +1,4 @@ +module Bug2 ( x ) where +import B +x :: A +x = A diff --git a/examples/Makefile b/examples/Makefile index 7fd20f45..034358ec 100644 --- a/examples/Makefile +++ b/examples/Makefile @@ -6,4 +6,6 @@ all :: index.html index.html : $(HS_SRCS) $(HADDOCK_INPLACE) $(HADDOCK_INPLACE) -h $(HS_SRCS) +CLEAN_FILES += index.html + include $(TOP)/mk/target.mk |