diff options
author | Judah Jacobson <judah@users.noreply.github.com> | 2020-03-02 12:09:23 -0800 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-03-15 10:57:48 -0400 |
commit | c35c545d3f32f092c52052349f741739a844ec0f (patch) | |
tree | ec3c157dbe12dd2d016e6d5c03161b063e899d6a /testsuite/tests | |
parent | 2e82465fff5851f00449131fdc8bacd3ca95f90f (diff) | |
download | haskell-c35c545d3f32f092c52052349f741739a844ec0f.tar.gz |
Add a -no-haddock flag.
This flag undoes the effect of a previous "-haddock" flag. Having both flags makes it easier
for build systems to enable Haddock parsing in a set of global flags, but then disable it locally for
specific targets (e.g., third-party packages whose comments don't pass the validation in the latest GHC).
I added the flag to expected-undocumented-flags.txt since `-haddock` was alreadyin that list.
Diffstat (limited to 'testsuite/tests')
-rw-r--r-- | testsuite/tests/haddock/should_compile_noflag_nohaddock/all.T | 1 | ||||
-rw-r--r-- | testsuite/tests/haddock/should_compile_noflag_nohaddock/haddockD005.hs | 4 |
2 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/haddock/should_compile_noflag_nohaddock/all.T b/testsuite/tests/haddock/should_compile_noflag_nohaddock/all.T index 1c68255e1b..c6e47b729b 100644 --- a/testsuite/tests/haddock/should_compile_noflag_nohaddock/all.T +++ b/testsuite/tests/haddock/should_compile_noflag_nohaddock/all.T @@ -11,3 +11,4 @@ test('haddockD001', normal, compile, ['']) test('haddockD002', normal, compile, ['']) test('haddockD003', normal, compile, ['']) test('haddockD004', normal, compile, ['']) +test('haddockD005', normal, compile, ['-haddock -no-haddock']) diff --git a/testsuite/tests/haddock/should_compile_noflag_nohaddock/haddockD005.hs b/testsuite/tests/haddock/should_compile_noflag_nohaddock/haddockD005.hs new file mode 100644 index 0000000000..b4c6c69abd --- /dev/null +++ b/testsuite/tests/haddock/should_compile_noflag_nohaddock/haddockD005.hs @@ -0,0 +1,4 @@ +module F where + +type F = (Int -- | x + ) |