blob: ea98f34c92ad255d819d4110ed12bc6206a81982 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
namespace LivingVillage.Kernel.Tests
open Microsoft.VisualStudio.TestTools.UnitTesting
open LivingVillage.Headless
/// P70：把 Headless `--performance-baseline`（defaultConfiguration）的最终 digest 钉住，
/// 作为 Kernel/Sim 数值路径漂移的护栏。与 scripts/bench-p70.sh 的 Kernel 档同一输入。
[<TestClass>]
type P70PerformanceBaselineTests () =
[<TestMethod>]
member _.PerformanceBaselineDigestIsPinned () =
let world = PerformanceProbe.runSteps PerformanceProbe.defaultConfiguration
let digest = PerformanceProbe.worldDigest world
printfn "P70 performance baseline digest=%s" digest
Assert.AreEqual<string>(
"953775FAEB2FDDE97289491AA260BD8D390C571E48A7A13AD2CB6FB7124F7F6C",
digest)
|
