summaryrefslogtreecommitdiff
path: root/src/LivingVillage.Desktop.Tests/M6aTests.fs
diff options
context:
space:
mode:
authorSomhairle H. Marisol <[email protected]>2026-09-20 15:14:23 +0800
committerSomhairle H. Marisol <[email protected]>2026-09-20 15:14:23 +0800
commit9724663602b4b1eb755bf334c475dc2c80e4b386 (patch)
tree681bfcc9f7bb6422ed80142702cfff1498f064b1 /src/LivingVillage.Desktop.Tests/M6aTests.fs
parent7e197babfbb68d7f7d1866d6a0ca47cf17d3af23 (diff)
downloadliving-village-9724663602b4b1eb755bf334c475dc2c80e4b386.tar.gz
feat(m6a): add save speed and day-night controls
Diffstat (limited to 'src/LivingVillage.Desktop.Tests/M6aTests.fs')
-rw-r--r--src/LivingVillage.Desktop.Tests/M6aTests.fs15
1 files changed, 15 insertions, 0 deletions
diff --git a/src/LivingVillage.Desktop.Tests/M6aTests.fs b/src/LivingVillage.Desktop.Tests/M6aTests.fs
new file mode 100644
index 0000000..1cc29d4
--- /dev/null
+++ b/src/LivingVillage.Desktop.Tests/M6aTests.fs
@@ -0,0 +1,15 @@
+namespace LivingVillage.Desktop.Tests
+
+open Microsoft.VisualStudio.TestTools.UnitTesting
+open LivingVillage.Kernel
+open LivingVillage.Desktop
+
+[<TestClass>]
+type M6aDesktopTests () =
+
+ [<TestMethod>]
+ member _.SpeedLabelsExposePauseAndThreeRunningModes () =
+ Assert.AreEqual<string>("PAUSED", M6Presentation.clockLabel { Paused = true; Speed = OneX })
+ Assert.AreEqual<string>("1X", M6Presentation.clockLabel { Paused = false; Speed = OneX })
+ Assert.AreEqual<string>("2X", M6Presentation.clockLabel { Paused = false; Speed = TwoX })
+ Assert.AreEqual<string>("5X", M6Presentation.clockLabel { Paused = false; Speed = FiveX })