testsuite/tests/ghci/scripts/T17669.script


1
2
3
4
5
6
7

:set -v1
System.IO.writeFile "T17669.hs" "module T17669 where main :: IO ();main = putStrLn \"this\""
:load T17669.hs
:main
System.IO.writeFile "T17669.hs" "module T17669 where main :: IO ();main = putStrLn \"that\""
:reload
:main