Commit 289d57a6 authored by kaiha's avatar kaiha Committed by Ben Gamari
Browse files

Add test for incompatible flags (issue #11580)

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #11580
parent b735e99d
{-# LANGUAGE Safe, Unsafe, Trustworthy #-}
-- | Basic test to see that incompatible flags give a nice error
-- message and ghc do not panic (see issue #11580).
module SafeFlags30 where
f :: Int
f = 1
ghc: SafeFlags30.hs:1:20-25: Incompatible Safe Haskell flags! (Safe, Unsafe)
SafeFlags30.hs:1:28-38: Incompatible Safe Haskell flags! (Safe, Trustworthy)
Usage: For basic information, try the `--help' option.
......@@ -62,3 +62,4 @@ test('SafeFlags29', normal, compile_fail, [''])
test('Flags01', normal, compile, ['-XSafe'])
test('Flags02', normal, compile, ['-XSafe'])
test('SafeFlags30', normal, compile_fail, [''])
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