Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/ff73844a8bc772595aeca59a8c0bd0b0dc780eec >--------------------------------------------------------------- commit ff73844a8bc772595aeca59a8c0bd0b0dc780eec Author: David Terei <[email protected]> Date: Thu Aug 23 02:01:03 2012 -0700 Add test for #7172. >--------------------------------------------------------------- tests/safeHaskell/ghci/all.T | 2 ++ tests/safeHaskell/ghci/p18.script | 10 ++++++++++ .../ann01.stderr => safeHaskell/ghci/p18.stderr} | 0 tests/safeHaskell/ghci/p18.stdout | 7 +++++++ 4 files changed, 19 insertions(+), 0 deletions(-) diff --git a/tests/safeHaskell/ghci/all.T b/tests/safeHaskell/ghci/all.T index 1c878c6..937dcd8 100644 --- a/tests/safeHaskell/ghci/all.T +++ b/tests/safeHaskell/ghci/all.T @@ -17,4 +17,6 @@ test('p14', normal, ghci_script, ['p14.script']) test('p15', normal, ghci_script, ['p15.script']) test('p16', normal, ghci_script, ['p16.script']) test('p17', normal, ghci_script, ['p17.script']) +# 7172 +test('p18', normal, ghci_script, ['p18.script']) diff --git a/tests/safeHaskell/ghci/p18.script b/tests/safeHaskell/ghci/p18.script new file mode 100644 index 0000000..445dffa --- /dev/null +++ b/tests/safeHaskell/ghci/p18.script @@ -0,0 +1,10 @@ +-- Test :issafe works +:unset +s + +-- first without package trust +:issafe Data.ByteString + +-- now with package trust +:set -fpackage-trust +:issafe Data.ByteString + diff --git a/tests/annotations/should_compile/ann01.stderr b/tests/safeHaskell/ghci/p18.stderr similarity index 100% copy from tests/annotations/should_compile/ann01.stderr copy to tests/safeHaskell/ghci/p18.stderr diff --git a/tests/safeHaskell/ghci/p18.stdout b/tests/safeHaskell/ghci/p18.stdout new file mode 100644 index 0000000..adc5c8a --- /dev/null +++ b/tests/safeHaskell/ghci/p18.stdout @@ -0,0 +1,7 @@ +Trust type is (Module: Trustworthy, Package: untrusted) +Package Trust: Off +Data.ByteString is trusted! +Trust type is (Module: Trustworthy, Package: untrusted) +Package Trust: On +Trusted package dependencies (untrusted): bytestring-0.10.0.0 +Data.ByteString is NOT trusted! _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
