blob: f86829b3cfcf7ace3e6a544b9707294f5966339b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
-- test for #1205
:l ../shell.hs
:def shell (\s -> do shell s; return "")
:shell rm -f A.o A.hi B.o B.hi
:load A
-- we can see both f and g (only f is exported)
:type f
:type g
:shell "$HC" $HC_OPTS $ghciWayFlags -fforce-recomp -c A.hs
:load A
-- we can now see only f
:type f
:type g
-- this will tell us we need to load A interpreted
:module *A
-- load A interpreted
:load *A
:type f
:type g
:shell "$HC" $HC_OPTS $ghciWayFlags -fforce-recomp -c B.hs
:load B
-- this will tell us we need to load A interpreted
:module *A
:add *A
:module *A
:type f
:type g
|
