Skip to content

Commit ccf6e00

Browse files
Replaced 1st unit test w/ conventional 'prove it works' test
1 parent 678fe4a commit ccf6e00

File tree

1 file changed

+3
-6
lines changed

1 file changed

+3
-6
lines changed

exercises/chapter7/test/Main.purs

Lines changed: 3 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -21,13 +21,10 @@ import Test.Unit.Main (runTest)
2121
main :: Effect Unit
2222
main =
2323
runTest do
24-
suite "Verify eqPhoneType in AddressBook to verify initial passing solutions tests" do
25-
test "HomePhone and HomePhone are equal"
24+
suite "Verify unit tests are set up" do
25+
test "true eq true"
2626
$ Assert.equal true
27-
$ eq HomePhone HomePhone
28-
test "HomePhone and WorkPhone are not equal"
29-
$ Assert.equal false
30-
$ eq HomePhone OtherPhone
27+
$ true
3128
suite "Exercise Group 1" do
3229
suite "Exercise 1: Use lift2 to write lifted versions of numeric operators" do
3330
test "+ (Just)"

0 commit comments

Comments
 (0)