diff --git a/test/TestBoard.flix b/test/TestBoard.flix index 0602e14..21cab0f 100644 --- a/test/TestBoard.flix +++ b/test/TestBoard.flix @@ -42,14 +42,14 @@ mod TestBoard { let boardString = rowStrings |> String.unlines; Flixball.BoardLibrary.fromString(boardString) - @test + @Test def testDimensions(): Bool = match testBoard01() { case Err(_) => false case Ok(Board(br)) => br#rows == 5+2 and br#cols == 10+2 } - @test + @Test def testTiles(): Bool = match testBoard01() { case Err(_) => false case Ok(Board(br)) => @@ -63,19 +63,19 @@ mod TestBoard { check(3, 5, None) } - @test + @Test def testBorder(): Bool = match testBoard01() { case Err(_) => false case Ok(b) => hasBorder(b) } - @test + @Test def testInboundCoordinates(): Bool = match testBoard01() { case Err(_) => false case Ok(b) => inboundTiles(b) } - @test + @Test def testError(): Bool = match " # \n v \n# Q " |> Flixball.BoardLibrary.fromString { case Err(_) => true diff --git a/test/TestNoise.flix b/test/TestNoise.flix index 8e1bbf7..73439d2 100644 --- a/test/TestNoise.flix +++ b/test/TestNoise.flix @@ -1,12 +1,12 @@ mod TestNoise { - @test + @Test def testBoolNoise2d01(): Bool = region r { let ans = Flixball.Noise.boolNoise2d(r, {width=5, height=4}, 512i64, 0.0); ans |> Array.forAll(Array.forAll(b -> b == false)) } - @test + @Test def testBoolNoise2d02(): Bool = region r { let ans = Flixball.Noise.boolNoise2d(r, {width=5, height=4}, 512i64, 1.0); ans |> Array.forAll(Array.forAll(b -> b == true)) diff --git a/test/TestOptions.flix b/test/TestOptions.flix index 17001b1..acbe1ed 100644 --- a/test/TestOptions.flix +++ b/test/TestOptions.flix @@ -3,31 +3,31 @@ mod TestOptions { use Flixball.Options.Action; use Flixball.Options.RunOption; - @test + @Test def testEmpty(): Bool = { let input = Nil; parse(input) == Action.Run(Nil, Nil) } - @test + @Test def testRunWithConfig(): Bool = { let input = "--config" :: "flixball.cfg" :: Nil; parse(input) == Action.Run(RunOption.Config("flixball.cfg") :: Nil, Nil) } - @test + @Test def testRunWithSeed(): Bool = { let input = "--seed" :: "12345" :: Nil; parse(input) == Action.Run(RunOption.Seed(12345i64) :: Nil, Nil) } - @test + @Test def testVersion(): Bool = { let input = "--version" :: Nil; parse(input) == Action.Version } - @test + @Test def testHelp(): Bool = { let input = "--help" :: Nil; parse(input) == Action.Help