Skip to content

Commit d562273

Browse files
garybgaryb
committed
Update tests for renamed prelude modules
1 parent 03f06a2 commit d562273

65 files changed

Lines changed: 103 additions & 102 deletions

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

‎examples/failing/Arrays.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
module Arrays where
1+
module Data.Array where
22

33
import Prelude
44

‎examples/failing/SkolemEscape2.purs‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
module SkolemEscape where
22

33
import Prelude
4-
import Eff
5-
import ST
4+
import Control.Monad.Eff
5+
import Control.Monad.ST
66

77
test _ = do
88
r <- runST (newSTRef 0)

‎examples/passing/Applicative.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,4 +13,4 @@ instance Applicative Maybe where
1313

1414
module Main where
1515

16-
main = Trace.trace "Done"
16+
main = Debug.Trace.trace "Done"

‎examples/passing/ArrayType.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -14,4 +14,4 @@ instance Functor [] where
1414

1515
module Main where
1616

17-
main = Trace.trace "Done"
17+
main = Debug.Trace.trace "Done"

‎examples/passing/Arrays.purs‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
module ArraysTests where
1+
module Data.ArrayTests where
22

33
import Prelude
44

@@ -23,12 +23,12 @@ test4 = \arr -> case arr of
2323

2424
module Main where
2525

26-
import Arrays
26+
import Data.Array
2727
import Prelude
2828

2929
main = do
3030
let x = [3,2,1]
3131
let y = sort x
3232
if x == [3,2,1]
33-
then Trace.trace "Done"
34-
else Errors.throwError "Not done"
33+
then Debug.Trace.trace "Done"
34+
else Control.Monad.Error.throwError "Not done"

‎examples/passing/Auto.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -12,4 +12,4 @@ module Auto where
1212

1313
module Main where
1414

15-
main = Trace.trace "Done"
15+
main = Debug.Trace.trace "Done"

‎examples/passing/BindersInFunctions.purs‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,12 @@
11
module Main where
22

33
import Prelude
4-
import Arrays
4+
import Data.Array
55

66
tails = map (\(_:xs) -> xs)
77

88
main =
99
let ts = tails [[1, 2, 3], [4, 5], [6]] in
1010
if ts == [[2, 3], [5], []]
11-
then Trace.trace "Done"
12-
else Errors.throwError "Incorrect result from 'tails'."
11+
then Debug.Trace.trace "Done"
12+
else Control.Monad.Error.throwError "Incorrect result from 'tails'."

‎examples/passing/Church.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,4 +15,4 @@ module Church where
1515

1616
module Main where
1717

18-
main = Trace.trace "Done"
18+
main = Debug.Trace.trace "Done"

‎examples/passing/Collatz.purs‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
module Main where
22

33
import Prelude
4-
import Eff
5-
import ST
4+
import Control.Monad.Eff
5+
import Control.Monad.ST
66

77
collatz :: Number -> Number
88
collatz n = runPure (runST (do
@@ -15,4 +15,4 @@ collatz n = runPure (runST (do
1515
return $ m == 1
1616
readSTRef count))
1717

18-
main = Trace.print $ collatz 1
18+
main = Debug.Trace.print $ collatz 1

‎examples/passing/Conditional.purs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,4 +6,4 @@ module Conditional where
66

77
module Main where
88

9-
main = Trace.trace "Done"
9+
main = Debug.Trace.trace "Done"

0 commit comments

Comments
 (0)