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 档同一输入。 [] type P70PerformanceBaselineTests () = [] member _.PerformanceBaselineDigestIsPinned () = let world = PerformanceProbe.runSteps PerformanceProbe.defaultConfiguration let digest = PerformanceProbe.worldDigest world printfn "P70 performance baseline digest=%s" digest Assert.AreEqual( "953775FAEB2FDDE97289491AA260BD8D390C571E48A7A13AD2CB6FB7124F7F6C", digest)