2025-08-04 07:14:00 +01:00
|
|
|
structure Test =
|
|
|
|
|
struct
|
|
|
|
|
open Railroad
|
|
|
|
|
open Railroad.Test
|
2024-11-19 04:21:54 +00:00
|
|
|
|
2025-08-04 07:14:00 +01:00
|
|
|
fun main () =
|
|
|
|
|
let
|
|
|
|
|
val tests =
|
|
|
|
|
List.concat [NormalMove.tests, NormalDelete.tests, Regression.tests]
|
|
|
|
|
val tests = concat tests
|
|
|
|
|
in
|
|
|
|
|
runWithConfig [Configuration.PrintPassed false] tests
|
|
|
|
|
end
|
|
|
|
|
end
|
2024-11-19 06:27:38 +00:00
|
|
|
|
2025-08-04 07:14:00 +01:00
|
|
|
val () = Test.main ()
|
