simpleTest :: Test
simpleTest =
  let
    runTest = return (Finished Pass)

    testInstance = TestInstance { name = "synthetic_test", tags = [],
                                  setOption = (\_ _ -> Right testInstance),
                                  options = [], run = runTest }
  in
    Test testInstance
simpleTest :: Test
simpleTest =
  let
    runTest = return (Finished Pass)

    testInstance = TestInstance { name = "synthetic_test", tags = [],
                                  setOption = (\_ _ -> Right testInstance),
                                  options = [], run = runTest }
  in
    Test testInstance
simpleTest =
  let
    runTest = return (Finished Pass)

    testInstance = TestInstance { name = "synthetic_test", tags = [],
                                  setOption = (\_ _ -> Right testInstance),
                                  options = [], run = runTest }
  in
    Test testInstance