Files
functional-programming-snake/scala/test/M04Spawn.test.scala
T
Lucas WintherandClaude Fable 5.2 edd57f0148 feat(course): audit fixes and twelve extensions (Modules 7b, 12, 13)
Audit pass:
- Frame rule counts frames since the last move, so every step lasts
  exactly movesEvery(score) frames, also right after a speed-up
- clampTime + MAX_GAP_MS: a hidden tab no longer replays the whole gap
- Pong Restart keeps held keys
- Fact corrections (mulberry32 output coverage, Haskell IO, uniform)
- New fixture cases from a mutation analysis

Extensions (all three tracks, shared fixtures, course text):
- Turn queue (Exercise 10.6), persisted high score (10.7),
  replay viewer (10.8), play() end-to-end helper (9.5)
- Optional State (4.7) and optional Module 7b, stack-safe IO
- Module 12, property-based testing with generators, shrinking,
  invariants and a model-based oracle
- Module 13, Conway's Life with a Click event
- JS type checking via jsconfig, JSDoc and types.d.ts
- Maintainer tools: scripts/mutate.mjs, scripts/typecheck-js.sh,
  Playwright end-to-end suite (e2e/, scripts/e2e.sh)

Docs: docs/contract.md is the canonical contract; specs and build log
under docs/superpowers.

Verified: JS 728, Scala 689, F# 691 unit tests; stubs and progression
M01-M13 and M07b; 176 end-to-end tests on Chromium and WebKit.

Co-Authored-By: Claude Fable 5.2 <noreply@anthropic.com>
2026-11-11 12:05:29 +01:00

53 lines
1.7 KiB
Scala

package snake
import Fixtures.*
class M04SpawnSuite extends munit.FunSuite:
cases("m04-free-cells").foreach { c =>
test(s"freeCells: ${c("name").str}") {
assertEquals(Spawn.freeCells(gameState(c("args")(0))), list(c("expected"))(point))
}
}
cases("m04-spawn").foreach { c =>
test(s"spawnApple: ${c("name").str}") {
assertEquals(Spawn.spawnApple(gameState(c("args")(0))), gameState(c("expected")))
}
}
cases("m04-new-game").foreach { c =>
test(s"newGame: ${c("name").str}") {
assertEquals(Spawn.newGame(c("args")(0).num.toLong), gameState(c("expected")))
}
}
cases("m04-tick").foreach { c =>
test(s"tick: ${c("name").str}") {
assertEquals(Spawn.tick(gameState(c("args")(0))), gameState(c("expected")))
}
}
// 3x2 board, one-cell snake, about to eat the apple at (1,0)
private val eating = GameState(3, 2, List(Point(0, 0)), Direction.Right, Direction.Right,
Some(Point(1, 0)), 0L, 0, Status.Playing, 0, None)
test("tick: eating the apple spawns a new one in the same step") {
// snake becomes (1,0),(0,0); free cells are (2,0),(0,1),(1,1),(2,1); seed 0 draws 1144304738 % 4 = 2 -> (1,1)
assertEquals(
Spawn.tick(eating),
eating.copy(snake = List(Point(1, 0), Point(0, 0)), apple = Some(Point(1, 1)), score = 1, seed = 1831565813L)
)
}
test("tick is spawnApple after advance") {
assertEquals(Spawn.tick(eating), Spawn.spawnApple(Rules.advance(eating)))
}
test("tick leaves the seed alone when no apple needs spawning") {
assertEquals(Spawn.tick(eating.copy(apple = Some(Point(2, 1)))).seed, 0L)
}
test("newGame is reproducible: same seed, same game") {
assertEquals(Spawn.newGame(42L), Spawn.newGame(42L))
}