craig.oates
/
death-socket
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
Browse Source

refactor tests -- use programmed image paths.

master
Craig Oates 5 years ago
parent
e1e089a559
commit
9652e6f444
1 changed files with 6 additions and 4 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 10
      TestCentre/LibraryTests.fs

10
TestCentre/LibraryTests.fs
Unescape View File

@ -36,6 +36,8 @@
let fixedSkiaImagePath = let fixedSkiaImagePath =
(loadLocation + "/RequiredInfo/Skia-599x336.png") (loadLocation + "/RequiredInfo/Skia-599x336.png")
let fixedSystemDrawingImagePath =
(loadLocation + "/RequiredInfo/SystemDrawing-338x307.png")
let allColours = let allColours =
let properties = let properties =
@ -345,7 +347,7 @@
[<Fact>] [<Fact>]
let ``Can determine image width using SkiaSharp`` () = let ``Can determine image width using SkiaSharp`` () =
let dimensions = let dimensions =
SkiaSharp (loadLocation + "/RequiredInfo/Skia-599x336.png") SkiaSharp (fixedSkiaImagePath)
|> GridPainter.determineImageDimensions |> GridPainter.determineImageDimensions
let result () = (fst dimensions) = 599 let result () = (fst dimensions) = 599
Assert.True (result ()) Assert.True (result ())
@ -353,7 +355,7 @@
[<Fact>] [<Fact>]
let ``Can determine image height using SkiaSharp`` () = let ``Can determine image height using SkiaSharp`` () =
let dimensions = let dimensions =
SkiaSharp (loadLocation + "/RequiredInfo/Skia-599x336.png") SkiaSharp (fixedSkiaImagePath)
|> GridPainter.determineImageDimensions |> GridPainter.determineImageDimensions
let result () = (snd dimensions) = 336 let result () = (snd dimensions) = 336
Assert.True (result ()) Assert.True (result ())
@ -361,7 +363,7 @@
[<Fact>] [<Fact>]
let ``Can determine image width using SystemDrawing`` () = let ``Can determine image width using SystemDrawing`` () =
let dimensions = let dimensions =
SystemDrawing (loadLocation + "/RequiredInfo/SystemDrawing-338x307.png") SystemDrawing (fixedSystemDrawingImagePath)
|> GridPainter.determineImageDimensions |> GridPainter.determineImageDimensions
let result () = (fst dimensions) = 338 let result () = (fst dimensions) = 338
Assert.True (result ()) Assert.True (result ())
@ -369,7 +371,7 @@
[<Fact>] [<Fact>]
let ``Can determine image height using SystemDrawing`` () = let ``Can determine image height using SystemDrawing`` () =
let dimensions = let dimensions =
SystemDrawing (loadLocation + "/RequiredInfo/SystemDrawing-338x307.png") SystemDrawing (fixedSystemDrawingImagePath)
|> GridPainter.determineImageDimensions |> GridPainter.determineImageDimensions
let result () = (snd dimensions) = 307 let result () = (snd dimensions) = 307
Assert.True (result ()) Assert.True (result ())

Write Preview
Loading…
Cancel
Save