Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Shayne Fletcher
Glasgow Haskell Compiler
Commits
06d253c9
Commit
06d253c9
authored
Nov 16, 2007
by
Simon Marlow
Browse files
update to test #1873, #1360
parent
b5998084
Changes
4
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/ghc-regress/ghci/prog009/A3.hs
0 → 100644
View file @
06d253c9
module
A
where
where
testsuite/tests/ghc-regress/ghci/prog009/ghci.prog009.script
View file @
06d253c9
:! cp A1.hs A.hs
import Data.List
:load A
:show modules
-- Data.List should still be in scope:
:t nub
:module +B
yan
:! touch A.hs
:! sleep 1
:! cp A3.hs A.hs
:reload
-- error, context drops to Prelude,Data.List
-- Data.List should still be in scope:
:t nub
:! sleep 1
:! cp A1.hs A.hs
:reload
-- ok again, B should be back in the context
yan
-- should keep B in the context
-- Data.List should still be in scope:
:t nub
:! sleep 1
:! cp A2.hs A.hs
:reload
:show modules
yan
yan -- error
testsuite/tests/ghc-regress/ghci/prog009/ghci.prog009.stderr
View file @
06d253c9
A.hs:1:15: parse error on input `where'
<interactive>:1:0: Not in scope: `yan'
testsuite/tests/ghc-regress/ghci/prog009/ghci.prog009.stdout
View file @
06d253c9
B ( B.hs, interpreted )
A ( A.hs, interpreted )
nub :: (Eq a) => [a] -> [a]
"tan"
nub :: (Eq a) => [a] -> [a]
"tan"
nub :: (Eq a) => [a] -> [a]
A ( A.hs, interpreted )
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment