12 lines
511 B
Scala
12 lines
511 B
Scala
package snake
|
|
|
|
/** Test helpers shared by the m09 suites. */
|
|
object M09Helpers:
|
|
|
|
/** The m09 program built from classicActions (ticks every 150 ms). The shipped `main` switches to speedActions in m10. */
|
|
lazy val classicMain: IO[Stream[IO[Unit]]] =
|
|
IO.randomSeed.map(seed => App.states(seed, App.classicActions).map(App.render))
|
|
|
|
/** The shapes an IO draws, in order (interpreted by `IO.trace`). */
|
|
def drawn(io: IO[Unit]): List[Shape] = IO.trace(io, 0).ops.collect { case Op.Draw(shape) => shape }
|