diff options
Diffstat (limited to 'testsuite/tests/backpack')
7 files changed, 10 insertions, 10 deletions
diff --git a/testsuite/tests/backpack/should_compile/bkp40.bkp b/testsuite/tests/backpack/should_compile/bkp40.bkp index d149d75877..749cfa5f92 100644 --- a/testsuite/tests/backpack/should_compile/bkp40.bkp +++ b/testsuite/tests/backpack/should_compile/bkp40.bkp @@ -36,7 +36,7 @@ unit eqmap where -- Need to insert redundant constraint to make it work... insert :: Eq k => k -> a -> Map k a -> Map k a insert k v (Assoc xs) = Assoc ((k,v):xs) -unit main where +unit top where dependency user[Map=ordmap:Map] (User as User.Ord) dependency user[Map=eqmap:Map] (User as User.Eq) diff --git a/testsuite/tests/backpack/should_compile/bkp40.stderr b/testsuite/tests/backpack/should_compile/bkp40.stderr index f250951578..56216c5f3e 100644 --- a/testsuite/tests/backpack/should_compile/bkp40.stderr +++ b/testsuite/tests/backpack/should_compile/bkp40.stderr @@ -7,8 +7,8 @@ [3 of 4] Processing eqmap Instantiating eqmap [1 of 1] Compiling Map ( eqmap/Map.hs, bkp40.out/eqmap/Map.o ) -[4 of 4] Processing main - Instantiating main +[4 of 4] Processing top + Instantiating top [1 of 2] Including user[Map=ordmap:Map] Instantiating user[Map=ordmap:Map] [1 of 2] Compiling Map[sig] ( user/Map.hsig, bkp40.out/user/user-GzloW2NeDdA2M0V8qzN4g2/Map.o ) diff --git a/testsuite/tests/backpack/should_compile/bkp41.bkp b/testsuite/tests/backpack/should_compile/bkp41.bkp index e8b5b24e35..fae5bc81fc 100644 --- a/testsuite/tests/backpack/should_compile/bkp41.bkp +++ b/testsuite/tests/backpack/should_compile/bkp41.bkp @@ -14,5 +14,5 @@ unit sig where import B app = print T -unit main where +unit top where dependency sig[B=impl:B] diff --git a/testsuite/tests/backpack/should_compile/bkp41.stderr b/testsuite/tests/backpack/should_compile/bkp41.stderr index 766317718c..1ef9343d38 100644 --- a/testsuite/tests/backpack/should_compile/bkp41.stderr +++ b/testsuite/tests/backpack/should_compile/bkp41.stderr @@ -5,8 +5,8 @@ [2 of 3] Processing sig [1 of 2] Compiling B[sig] ( sig/B.hsig, nothing ) [2 of 2] Compiling App ( sig/App.hs, nothing ) -[3 of 3] Processing main - Instantiating main +[3 of 3] Processing top + Instantiating top [1 of 1] Including sig[B=impl:B] Instantiating sig[B=impl:B] [1 of 2] Compiling B[sig] ( sig/B.hsig, bkp41.out/sig/sig-HVnmSw44WZeBfwnUur4wzl/B.o ) diff --git a/testsuite/tests/backpack/should_compile/bkp42.bkp b/testsuite/tests/backpack/should_compile/bkp42.bkp index 59590f9125..9541738852 100644 --- a/testsuite/tests/backpack/should_compile/bkp42.bkp +++ b/testsuite/tests/backpack/should_compile/bkp42.bkp @@ -17,5 +17,5 @@ unit sig where app :: T -> IO () app t = print t -unit main where +unit top where dependency sig[B=impl:C] diff --git a/testsuite/tests/backpack/should_compile/bkp42.stderr b/testsuite/tests/backpack/should_compile/bkp42.stderr index ae2bb75c51..460a098e18 100644 --- a/testsuite/tests/backpack/should_compile/bkp42.stderr +++ b/testsuite/tests/backpack/should_compile/bkp42.stderr @@ -6,8 +6,8 @@ [2 of 3] Processing sig [1 of 2] Compiling B[sig] ( sig/B.hsig, nothing ) [2 of 2] Compiling App ( sig/App.hs, nothing ) -[3 of 3] Processing main - Instantiating main +[3 of 3] Processing top + Instantiating top [1 of 1] Including sig[B=impl:C] Instantiating sig[B=impl:C] [1 of 2] Compiling B[sig] ( sig/B.hsig, bkp42.out/sig/sig-Ko6MwJiRFc509cOdDShPV5/B.o ) diff --git a/testsuite/tests/backpack/should_fail/bkpfail51.stderr b/testsuite/tests/backpack/should_fail/bkpfail51.stderr index c732e0bcbf..9f40ff1d01 100644 --- a/testsuite/tests/backpack/should_fail/bkpfail51.stderr +++ b/testsuite/tests/backpack/should_fail/bkpfail51.stderr @@ -2,7 +2,7 @@ [1 of 2] Compiling H[sig] ( p/H.hsig, nothing ) [2 of 2] Compiling I ( p/I.hs, nothing ) [2 of 2] Processing q -Module imports and instantiations form a cycle: +Module graph contains a cycle: instantiated unit p[H=A] imports module ‘A’ (q/A.hsig) which imports instantiated unit p[H=A] |